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Inhalt: 


für den privaten Haushalt: 

— Kontenverwaltung 

— Haushallsbilanzen 

— Orakel: Hochrechnung effektiver 
Verbraucherkosten 

— Lohnsleuerberechnung 

— KFZ-Kosten 

— Belegverwaltung 

— Bankformulare 

— Wertpapierverwaltung 

— Komfortable Währungsumrechnung 

— Tilgung 

— Komplette Mini-Tabellenkalkulation 

für kleinere Business-Anwendungen: 

— Rechnungsschreibung 

— Pecunia 

— Bestellung und Bestand 

— Superplan 


Der Finanz-Fachmann 


Ein CPC-Mega-Sampler, voll mit praktischen 
Anwenderprogrammen rund ums iiebe Geid 
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Lernen mit Spaß 




Sicheriich iiegt es Ihnen auch am Herzen, daß die Sprößiinge eifrig und 
effektiv iernen und nicht nur stur büffeln. 

Der Pädagoge Berthold Freier hat mj.den Programmdisketten 
“Lernen mit Spaß” 1 und,2 ein Lerrriristrument geschaffen, das in dieser 
Art einmajigj$.t. Auf den Disketten befinden sich zahlreiche Spiei- 
programme’, die Ihren Kindern spielerisch das Verständnis für Zahlen, 

Text und Farben vermitteln. Auch das Allgemeinwissen wird aus¬ 
reichend gefördert. 

Für Kinder von 4 bis 12 Jahren wiff^durch “Lernen mit Spaß” 1 und 2 
der CPC-Computer zum lehrreichen Freund. 

Machen Sie ihren Kindern mit “Lernen m it Spaß” eine Freude. 

Lernen mit Spaß 1 DM 24,95* Lernen mit Spaß 2 DM 24,95 



Joyce-Highlights: 

Software-Perlen für Ihren Joyce/PCW 


JOYCE-Highlights I: “Anwender” 

Viele nützliche Arbeitserleichterungen 

Spooler: Druckerspooler (256 und 512 KByte) 

• CAT: zeigt Disketteninhalt sortiert, auch versteckte 
Dateien • Loco2Pro: Konvertierung von LocoScript 
nach Prowort File • Rescue: Retten gelöschter 
Daten • Akte: Etikettenprogramm • Kalender: 
Feiertage, persönliche Daten • Drucken List V2.1 : 
Listingdrucken und Kommentare • Funktionstasten; 
zeigt die Belegung auf allen fünf Ebenen • Für 
immer und ewig: Komprimieren und Entpacken von 
Dateien • Vario: Hardcopy auf (fast) allen Druckern 

• JOYCE'Tools: Benutzeroberfläche für 
Dateibearbeitung 


nur DM 29, 


JOYCE-Highlights II: “Spiele” 

Für jeden etwas dabei. 14 ausgesuchte Spiele 
als Programmpaket - vom Kinderspiel über 
Unterhaltung bis zum kniffligen Denkspiel 


Gobang 

Pingo 

Backgammon 

Mensch, ärgere dich nicht 

Lokomotive 

Rubik’s Clock 

Industriemanager 


- Jackpot 

- Poker 

- Fruit 

- Master Mind 

- Ölmanager 

- Verbindungen 

- Q-Bert 

nur DM 29, 


■ labhäpoig von dor AnaahldarbestellMn Programme berechnen wir tördas Intand 4.— DM bzw. lOr das Ausland 6,— DM Porto und Verpackung. Bitte benutzen Sie d« BetteilKarte 
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Nicht totzukriegen 



” Es gibt nichts Neues unter der Sonne”, so seufzt der Prediger Salomo im Alten Testament. 

Auch im alten Orient hatte man sicher nicht unter Langeweile zu leiden. Jedoch - unter der kritischen Lupe 
des Verzweifelten entlai-vt sich auch die sensationellste Neuigkeit ihrem Wesen nach als alter Hut. Alles schon 
dagewesen - hatten wir alles .schon mal. 

Szenenwechsel: CeBIT 1992, Hannover. Hektisches Treiben in 21 Mes.sehallen. Neuigkeiten, wohin das Auge 
blickt. Flotte Rhythmen aus grauen Kästen-ha! Da kommt ja Musik aus dem Computer! Bild undTon vereint 
- das goldene Tor zum Multimedia-Zeitalter. Doch was höre ich da aus der letzten Reihe? "Alles schon mal 
dagewesen.” C-64, Atari XL, ST.Amiga und natürlich der gute alte CRC: Da stehen sie und grinsen. Es ist wie 
hei der alten Fabel vom Hasen und dem Igel: Kaum hat sich Meister Langohr abgehetzt über die Ziellinie ge¬ 
quält, erscheint ganz unem'artet der behäbige, aber quielschfidele Igel auf der Bildfläche und ruft fröhlich: 
"Ik bün al dor!” (Übersetzung für Nicht-Plattdeutsche: "Ich hin schon da!”) 

Na gut, dann eben Video: Filmtitel selber schreiben, mit grafischen Schnörkelchen natürlich. Eine kleine Ani¬ 
mation als Blickfang. Das Ganze direkt auf den Videorecorder ausgegeben - die Sensation ist perfekt. 

Die CPCs sind einfach nicht totzukriegen. Und zeigen ihren erstaunten Benutzern immer wieder, daß man 
auch gute alte Bekannte nicht unter.schätzen sollte. 


In diesem Sinne grüßt Sie Ihr 



Peter Schmitz. Chefredakteur 
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Das Locomotive- 
BASIC des CPC 
bietet jede Menge 
komfortabler Befehle 
zur Schleifenbildung. 
Bei der Entscheidung, 
welche Schleife wann 
einzusetzen ist, 
möchten wir Ihnen 
jedoch ein wenig 
helfen. 

Sette 46 



Messen gab es im März mehr als genug. So fand vom 11. bis 18. 
März in Hannover die CeBIT statt, wo es so manch interessante 
Neuigkeit zu sehen gab. Für denjenigen, der auch gerne außer 
Prospekten etwas von einer Messe mit nach Hause nimmt, war 
dann vom 25. bis 29. März in Dortmund die Hobby-tronic zu 
empfahlen. g/g 


Im Rollenspiel-Kurs 
gehen wir diesmal ins 
Detail. Das bisher 
zweidimensionale 
Spielbrett wird jetzt 
um einen Zoomeffekt 
mit großer Wirkung 
erweitert. 

Seite 58 



Bild: Messe AG 
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Den Joyce in der Hand, traben wir durchs Land. Und was wir da 
sehen, kann der Joyce ganz bestimmt auch. Die Vererbung von 
bestimmten Merkmaien wollen wie Ihnen in Wort und Spiel etwas 
näher bringen. gg 



Und da sage noch 
einmal jemand, für 
den CPC gäbe es 
keine Software. Auf 
ganzen zehn Seiten 
stellen wir Ihnen 
aktuelle Software wie 
zum Beispiel ‘Toyota 
Ceiica” und “Rodland" 
vor. 

Seite 74/80 



leder sollte in der Lage sein, die für ihn bestimmten Textdateien zu 
esen. TYPE.COM. das normalerweise unnötigen Speicherplatz auf 
hren Disketten frißt, wird nun überflüssig. _ .. _ _ 

Seite 20 
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CeBIT-Splitter 

Eindrücke und Trends 
aus Hannover 

Wenn die Computer langsam langweilig werden, müssen 
wir eben anderweitig für einen Blickfang sorgen- 
das mag sich manch ein Aussteller gedacht haben. 

Und so gab es auf der CeBIT nicht nur “hocherotische” 
Kunststoffgehäuse, Leiterplatten und Software¬ 
verpackungen /u sehen. Hübsche Mädchen, bunte 
Kostüme und phantasievolle Aktionen zogen das Auge 
des Betrachters auf sich und machten die präsentierte 
Technologie noch interessanter. 


Die internationale Leilmesse für Infor- 
malionstechnik. Datenverarbeitung 
und Telekommunikation ging auch 
diesmal wdeder in der nicdersächsi- 
schen Landeshauptstadt über die Büh¬ 
ne - und zwar vom 11. bis zum 18. 
März. 

Man kann sich an alles gewöhnen - 
auch an Superlative. So überraschte es 
kaum noch jemanden, dal3 auch die dies¬ 
jährige CeBIT wie schon ihre Vorgän¬ 
gerinnen in den letzten Jahren sämtli¬ 
che bisherigen Besucherrekorde brach. 
Insgesamt wälzten sich 630000 Men¬ 
schen (im Vorjahr: 578000) durch die 
21 Hallen, in denen 5317 Aussteller aus 
40 Ländern neue Lösungen, Know- 
how, technologische Kuriositäten und 



Mit dem auf der CeBIT voraestelllen “Charnp" 
rnöelite die für ihre Taschemvörterhueh-Com- 
inner bekannte Firma Hexaglot in den Markt 
der fiandfield-Spielsysieme einsteigen. Das 
nicht erweiterhare Bhck-LCD-Geräl mit vier 
eingebauten Komlnnation.sspielen kostet 89 
DM. Oh der Ver.such Erfolg haben wird? 


auch eine ganze Menge Altbekanntes 
zeigten. 

Die leidgeprüfte hannoversche Polizei 
konnte den Fahrzeugansturm strecken¬ 
weise nicht mehr unter Kontrolle be¬ 
kommen, und der ständige Regen tat 
ein übriges; Etliche Parkplätze hallen 
sich in Schlammlöcher verwandelt und 
waren zeitweise nicht benutzbar. 

Also .sah man zu, .sich möglichst schnell 
und ohne Umweg in die Hallen zu bege¬ 
ben. Und dort waren auch sehr schnell 
die “Highlighi.s” und Trends dieser 
Messe auszumachen: Pen-Computing, 
Multimedia und Mobilfunk hießen die 
drei Schlagworte, die auf der CeBIT 
1992 am meisten im Gespräch waren. 
“Pentops” - auf gut deutsch “Stift- 
Computer” - waren reichl ich vertreten. 
Es handelt sich dabei um transportable 
PCs mit speziellen LCD-Bildschirmen, 
die eine Steuerung über einen Kontakt- 
slift erlauben. Mit diesem Stift tippt 
oder mall man auf den Bildschirm - 
ähnlich dem Lightpen auf die Matt¬ 
scheibe. Spezielle Software erlaubt 
nicht nur da.s Anwählcn von Menü¬ 
punkten mit dem Stift, sondern auch 
das Freihandzeichnen und das Einträ¬ 
gen von Schriftzeichen. Gerade letzte¬ 
res hat in den Medien zu einer vor¬ 
schnellen Euphorie geführt. “Der idea¬ 
le Computer für den Einsleigcr, dem 
der Umgang mit Computern zuwider 
ist”, so konnte man hören. Ohne Tasta¬ 
tur, so wurde dem Laien suggeriert, 
könne er Text eingeben wie in sein altes 
Notizbuch - einfach indem er diesen 
Text mit dem Stift auf den Bildschirm 
schreibt. 

In der Praxis erweisen sich diese Ver¬ 
sprechungen jedoch als purer Unsinn. 
Die Handschriftum.setzung, über die 
ein “Stift-Computer” verfügt, kann nie¬ 
mals einen flüssig geschriebenen Text 


in ASCII-Text verwandeln und spei¬ 
chern. Im günstigsten Fall werden kur¬ 
ze Notizen, die aus einzelnen Druck¬ 
buchstaben bestehen, weitgehend rich¬ 
tig umgesetzt - aber das geht selbst bei 
den stärksten Pentops so quälend lang¬ 
sam, daß es sich höchstens für Adreß- 
oder Werteeingaben eignet. Damit die 
Erkennung überhaupt funktioniert, 
bringt der Benutzer dem Pentop für je¬ 
des Schriftzeichen eine Reihe von 
“Mustern” bei. Selbst ein “gut trainier¬ 
ter” Pentop macht jedoch bei der 
Schriftumsetzung jede Menge Fehler. 
FürMitschriften oder Manuskripte eig¬ 
nen sich die “tastaturlosen” Computer 
überhaupt nicht - was auch die Herstel¬ 
ler zugeben. Für Texieingabe besitzen 
manche Pentops zusätzlich eine ganz 
gewöhnliche PC-Tastatur, außerdem 
gibt es eine simulierte Ta.stalur, die sich 
per Stiftdnick auf den Schirm holen 
und dort dann mühsam mit dem Stift 
betätigen läßt. 

Mit “Pen-Windows” liefert Microsoft 
eine .stifttaugliche Version seiner PC- 
Benutzeroberlläche. So ist der stiftbe¬ 
geisterte Benutzer nicht von vornher¬ 
ein auf Spezialsoftware seines Pentop- 
Herstellers angewiesen. 

Multimedia... 

Unter dem Schlagwort “Multimedia” 
verbindet sich die Integration von Bild 
und Ton am Computer mit der Nutzung 
von Compact-Disc und Videotechnik. 
Die zugrundeliegende Technik ist je¬ 
doch bei Licht betrachtet nichts Neues: 
Die CD als Bild- und Tonträger sowie 
als umfangreicher Nur-Lese-Mas- 
senspeicher für den Computer ist eta¬ 
bliert. Soundkarlcn (so etwas braucht 
ein anständiger 8-Bit-Computer über¬ 
haupt nicht) für den PC ebenfalls. Vi- 
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deo-Digitizer kennt man schon seit Jah¬ 
ren, und die Steuerung von Bildplatte 
und Videorecorder über ein Interface 
ist auch noch von guten alten MSX- 
Zeiten her vertraut. 

Fehlt also nur noch eine Umgebung, die 
all diese Komponenten unter einen Hut 
bringt - und fertig ist das “Multime- 
dia”-Wunderland. Microsoft liefert mit 
der “Multimedia”-Extension für Win¬ 
dows .3.0 eine erste Plattform für den 
PC. Das neue Windows 3.1 enthält die¬ 
se Erweiterung bereits von Haus aus. 
Wenn Otto Normalanwender dann ir¬ 
gendwann auf breiter Basis begriffen 
hat. wozu er all das brauchen soll, steht 
dem Anbruch des “multimedialen Zeit¬ 
alters” nichts mehr im Wege. Vorerst 
scheint es aber noch nicht soweit zu 
sein. 

Was bleibt, sind Einzelkomponenten - 
und die können bisweilen schon ver¬ 
blüffen: Da gibt es den Tintenstrahl- 
Farbdrucker, -Scanner und -Kopierer 
CLC 10 von Canon, der zusammen mit 
einem Interface, einer Bildquelle und 
entsprechender PC-Soflware ein uni¬ 
verselles Bildbearbeitungs-Werkzeug 
darslcllt. Schade bloß, daß diese “eier¬ 
legende Wollmilchsau” mit der hervor¬ 
ragenden Farbbildausgabe nicht für un¬ 
ter 17000 DM zu haben sein wird. 

Etwas billiger kommt man da schon 
weg, wenn man stolzer Besitzer einer 
Videoblaster-Karte ist. Wie CPS ver¬ 
lauten ließ, soll diese für unter 1000 
DM zu haben sein. Ist man nun noch 
Besitzer einer Videokamera und der 
richtigen Grafikkarte, so steht einem 
schon der Multimcdia-Himmel offen. 
Nun kann man seine Liebsten oderauch 
den Supcrschlitten auf die Festplatte 
bannen. Auf Wunsch kann man sich 
diese dann, eventuell auch bewegt, in 
einem Windows-Fenster ansehen. Also 
Familienfoto weg vom Schreibtisch 
und rauf auf den Monitor. 



Ähnlich dem Andra/iff att/ der CclUT war das 
Faß auf der Party zum Überlaufen voll. Wer 
nicht dabei war ... macht nichts! Nächstes Jahr 
gibt es bestimmt wieder eine Party 


Bei den Druckern gab es nur wenige 
Sensationen. Eine davon warsicherlich 
der in Deutschland entworfene und in 
Rußland gebauter POCeT Thermo- 
Tintenstrahldrucker für nur 250 DM. 
Immerhin mit 2 kByte Druckerpuffer 
ausgestattet, erreicht er eine maximale 
Druckge.schwindigkeit von 150 Zei¬ 
chen pro Sekunde. 

Aber auch die Nadeldrucker sind noch 
nicht out. Der Seikosha SL-90 wartet 
mit einer Druckgeschwindigkeit von 
240 eps auf. 599.- DM sind für diesen 
24-Nadler sicher nicht zuviel. 
Panasonic zeigte einen neuen 24-Na- 
del-Drucker. der bei gleicher Leistung 
nur noch halb so viel Geräusche produ¬ 
ziert wie sein Vorgänger. 

Für 648,- DM kann man aber auch den 
9-Nadler KX-P2180 erstehen. Vorteil 
hierbei: Optional kann noch ein Farbkit 
integriert werden. 

Neue Dimensionen 

Für großen Medienrummel sorgte ein 
Forschungsprojekl des Stuttgarter 
Fraunhofer-Instituts für Produktions¬ 
technik und Automatisierung, das am 
Stand der Firma Silicon Graphics zu se¬ 
hen war. “Virtual Reality” war das 
Stichwort, die meisten ordneten der Sa¬ 
che jedoch das weitaus bekanntere 
Schlagwort “Cyberspace” zu. 

Um die Simulation und Steuerung von 
Industrierobotern zu verbessern, ent¬ 
wickelte das Institut eine Workstation 
aus verschiedenen Computersysiemcn. 
Diese “Virtual Reality”-Workstation 
liefert eine dreidimensionale simulier¬ 
te Welt, in der sich der Benutzer mit 
Hilfe einer Sleuerkugel bewegt. Mit ei¬ 
nem Datenhandschuh werden seine 
Handbewegungen in Aktionen inner¬ 
halb der simulierten Welt übertragen. 
Diese Welt sieht der Benutzer über eine 
Stereo-Brille plastisch und farbig. 



Ungewöhnliche Silzmöhel für den Computer- 
Arbeitsplütz zeigte die Eggensteiner Firma 
Welco. Die Mickyniaiis-Stiihle der “Proß"-Se¬ 
rie sind übrigens "Made in Germany" 



Als die "tasratiirlo.sen Computer der Zukunft’' 
wurden die Pentops (hier der "Momenta") et¬ 
was voreilig angepriesen 



Das große Zauberwort auf der CeHPF war un¬ 
bestritten Multimedia. Mir einem entsprechen¬ 
den Drucker wird es auch möglich, die gerade 
aufgezeichneten Bilder auszudrucken. Im hier 
stark vergrößerten Bild sieht man deutlich die 
Punkfstruktur. - Oh solche .Ausdrucke wohl 
einmal un.sere heutigen Fotografien ersetzen? 

Funktionen, die über die reine Bewe¬ 
gung hinausgehen, werden mit dem 
Datenhandschuh aus sogenannten vir¬ 
tuellen Menüs au.sgewählt. Das sind 
Pulldown-Menüs, die plötzlich mitten 
im Raum vor dem Betrachter auftau¬ 
chen - faszinierend! Wenn man Robo¬ 
ter mit Hilfe der hier verwendeten 
neuartigen Mensch-Maschine-Schnilt- 
stellen trainiert, spart das teure Einrich¬ 
tungszeit in der Industrie. Von einer 
Anwendung im Unterhaltungssektor 



Einen Industrieroboter durch Bewegungen in¬ 
nerhalb einer künstlichen Welt programmieren 
- das spart eine Menge 'Zeit 
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wollen die Entwickler des Systems vor¬ 
erst nichts wissen, von 
und künstlichen Wellen als Bewußt- 

seinsdroge” erst recht nichts. 

Immerhin dürfte die nötige Ausrüstung 
schon das Budget eines gulbetuchien 
Unternehmens voraussetzen: ein 

UNIX-Netzwerk mit zwei speziellen 
Grafikrechnern, eine SUN-Station zur 
Steuerung des Roboters- dazu em Mac- 
intosh-System, das die Fingerwerte des 
Handschuhs für den Greifer des^ Robo¬ 
ters umsetzt. Dann natürlich der Ar¬ 
beitsplatz des “Reisenden : ein Si z mit 
der Steuerkugel, dazu der Datenhand¬ 
schuh und der Helm mit der Stereo- 
Brille. Also, kein künstliches Traum 
land zum Entspannen für jedermann - 

aber ein faszinierendes Forschungspro- 

iekt, über das wir vielleicht bei Gele¬ 
genheit noch Näheres berichten kon- 

In Halle 18 ging es unter dem Dach von 
“Chancen 2000” um Aus- und Weiter¬ 
bildung im Zusammenhang mit dem 
Computer. Hier demonstrierte etwa die 
Fachhochschule Niederrhein m Zu¬ 
sammenarbeit mit der Bundespost Te¬ 
lekom den grafisch unterstützten On 

line-lnformationsausiausch zwischen 

Modedesignern in ganz Europa - eine 


Liveschaltung zwischen Helsinki m 
Finnland (neben Norwegen emes der 
diesjährigen offiziellen CeBIT-Part 

nerländcr) und Hannover zeigte das ko¬ 
operative Entstehen einer Kollektion m 
Minuten über Landesgrenzen hinweg. 
Eine Modenschau würzte die Präsenta¬ 


tionen. 


Chancen 2000 

Aber nicht nur das “große Business” 
hatte bei “Chancen 2000” seinen Platz. 
An einem der Stände begegneten wir 
einem Team von der P^derbomer 

Schülerzeitung‘‘Flashlighl .Dei Chet- 

redakteur Mark Kuschel berichl^e uns, 
daß die wirklich professionelle Gestal 
tung seines Blattes durch die Zusam¬ 
menarbeit mit einem großen Compu- 
terhersteller möglich gewesen sei, der 
eine komplette DTP-Anlage mitsamt 
Scanner und Profi-Software zur Verfu- 

2ung gestellt habe. 

Ein Engagement, das zur Nachahmung 
herausfordert - Leute wie die “Flash- 
liaht”-Machcr werden m einigen Jah¬ 
ren höchstwahrscheinlich erfolgreiche 
Medienarbeit im kommerziellen Rah¬ 
men leisten. Daß auch der Z80. das 
Herz des GPC, in der kommerziellen 


Technik nicht totzukriegen ist, war am 
Stand der Firma Sophia Systems zu er¬ 
fahren. ln vielen Maschinensteuerun¬ 
gen dient der Z80 als Prozessor und 
selbst Ein-Chip-Rechner auf Z8()-Ba- 
sis drängen auf den Markt. Die japani¬ 
sche Firma stellte einen Z80-Harü- 
ware-Emulator in Palmtopausführung 
vor. Dieses Gerät mit dem Namen 
Z80TAT ist für den Service und zur 

Software-Entwicklungvorgesehen. 


Z80 auf der CeBIT 

ln das zu testende Gerät wird anstatt des 
Z80-Prozessors ein Adapter gesteckt, 
der mit dem Palmtop verbunden ist. Ist 
man vor Ort an der Maschine, kann das 
Display des Palmlops benutzt werden. 
Hat man einen PC zur Hand, so kann 
man diesen und damit seinen besseren 
Bildschirm zur Arbeit nutzen. Fest mie- 
ariert im Z80TAT ist ein Monitor nebst 
Debugger und Assembler. ' 

ware-Spezialisien, die jetzt vielleicht 
schon aufhorchen, sei je^loch gesagt 
daß das komplette Gerät um die 80()0 
dm kostet. Für eine einmalige CPL- 
Reparatur - er geht ja doch recht selten 

kaputt -wohl etwas zu teuer. 

^ sz/rs/jg 



Das AmsiracI FX6000AT: 

Telefon, Telefax und Anriißeanwortci 

in eitlem 


Bei Amstrads auf der CeBIT 

Selbstverständlich war dieses lahr auch die 

i:;:«1:rs::MLirhlerjedochn«cha«fel^ 

fuhren. 


Durch den Kauf einer 29 , 5 prozenUgen 
Beteiligung an dem britischen Te e- 

kommunikations-Untemehmen Beta- 

com plc betrat Amstrad den Mark! dci 

Telekommunikation. 

Pünktlich zur CeBIT konnte man dann 
voller Stolz auch für diesen Markt zwei 
äußerst interessante Gerätschaften vor¬ 
führen. . ,r; 

VoreestelU wurde ein Prototyp des Vi- 
deophones, das in Zusammenarbe.i mit 
dem renommierten Haus 
cnlwickell wurde. Dieses Bddtclefon 
verfügt über einen 

mit einer Auüösung von 128x96 Bdd- 
nunkien. Mit der eingebauten Mim-Ka- 
mera wird das Bild aufgenommen und 


fahren. 

an den Gesprächspartner übersandt Ne¬ 
ben der Bildiauglichkeit bietet das Tele¬ 
fon alle Eigenschaften bereits im mn- 
del befindlicher Telefone, so zum Bei¬ 
spiel einen Rufnummer-Speicher und 
Stummschaltung. . 

Für rund 1500 DM kann nun mehl nur 
der Geschäftsmann seine Faxe ver¬ 
schicken. Bei dem FX6000AT handelt 
es sich um ein kompaktes Rommunika- 
lionssysiem mit eingebautem Telefon. 

AnrufbeantworierundTclefax. 
und 2400 Baud zur Verfügung. 

Im Gegensatz zu dem Bildielefon be¬ 
sitzt das FX600A1 schon eine ZZF-Zu- 


lassung, darf also im deutschen Raum 

betrieben werden. . , u • 

Auch in Sachen Drucker hat sich be, 
Amstrad wieder eiwas getan. So wurde 
neben dem bereits gut verkauften 
LD6000 nun auch ein Postscripl-tani- 
ger Drucker mit der Bezeichnung LD 
9002 PS vorgestellt. Er wird mit z 
MByte Speicher sowie PostScript Level 
2 ausgelieferi. 

Für PC-Anwender interessant ist aucn 

eine weitere Beigabe. 

So stehen mit dem LD 9002 PS ^5j-esi- 

dente Postscripl-Schriftarten ^ ^ 
Bilmap-Fonts im HP-Laserjet-lI-Mo- 
duszurVerfügung. ^ 
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Hobby-tronic 


Eldorado für Bastler 


Vom 25. bis zum 29. März fand im Messezentrum Westfalcnhallen Dortmund 
die 8. Ausstellung für Computer, Software und Zubehör statt. Gegenüber 
den großen Messen in München und Hannover war der Sinn dieser Messe in 
anderer Richtung abgesteckt. Verkaufen war die Devise- und zwar was das 
Zeughält. 


Wer eine Messe besuchen, gleichzeitig 
einen kleinen Einkaufsbummel ma¬ 
chen und möglichst wenig Geld ausge¬ 
ben möchte, für den ist die Hobby-tro¬ 
nic die opitmale Wahl. Dem war zumin¬ 
dest im März dieses Jahre,s so, als die 
Hobby-tronic zum achtenmal in Dort¬ 
mund ihre Pforten öffnete. 

In den Hallen 6 und 7 konnte der inter¬ 
essierte Besucher auf insgesamt 13600 
qm Ausstellungsfläche so manches 
Schnäppchen machen. 

Wer zum Beispiel mit seinem CPC oder 
Joyce ein wenig DFÜ betreiben wollte. 



Spcitcslens hier, ciin Suiiul iVISX/SVI-Cotii- 
putercluhs, muß jedes 8-Bit-Uerz um minde- 
slens eine Oktave höher schUifien 


hatte hier eine große Auswahl. Da 
240ü-Baud-Modems langsam, aber si¬ 
cher “Auslaufmodelle” sind, CPC und 
Joyce jedoch bei höheren Übertra¬ 
gungsraten leicht zu Fehlern neigen, 
konnten diese Modems speziell für 8- 
Bit-Geräte zu wirklich humanen Prei¬ 
sen erstanden werden. 

Den Eindruck eines Ausverkaufs 
machten mehrere Stände, wo zum Teil 
meterhohe Stapel an 8-Bit-Literatur 
feilgeboten wurde. Wer nicht ganz so 
viel Wert auf Aktualität und Top-Lei¬ 
stung legte, konnte sich locker fiireini- 



Mil dem Siaiuhirihverk "Mehr Lijolfi mit 
CPC’’ mir der Inieresi-Verlag uueh auf der 
Hobby-tronic vertreten 


ge hundert Märker einen PC zusam¬ 
menbasteln. Aber Vorsicht war gebo¬ 
ten. Daß es sich wirklich um eine Bast¬ 
lermesse handelte, zeigte schon allein 
die Tatsache, daß zwar sehr preisgün¬ 
stig, im großen Maße jedoch ohne Ga¬ 
rantie auf die Funktionstüchtigkeit der 
Geräte verkauft wurde. So konnten 
486-Motherboards für 10.- DM, je¬ 
doch ohne Garantie erstanden werden. 

Der Schein trügt 

Hatte man sich durch Halle 6 hindurch- 
gewühlt, konnte der Besucher mit 
wachsamem Auge urplötzlich vier Mo- 
nitore erspähen, die - man höre und 
staune - den Monitoren der CPC-pIus- 
Scrie zum Verwechseln ähnlich sahen. 
Ein zweiter Blick bestätigte dann die 
Vermutung, und sofort ging es auf zu 
diesem Stand. Dort angekommen, ließ 
man sich jedoch aufklären, daß es sich 
zwar um CPC-Monitore handele, man 
diese jedoch nicht - wie eigentlich ge¬ 
dacht - an einen CPC, sondern viel¬ 
mehr an Amiga und Konsorten ange¬ 
schlossen habe. Die Monitore habe 
man nur genommen, weil durch ihre 
gute Auflösung die Funktion des vorge¬ 
stellten Trojan-Phaser wunderbar de¬ 
monstriert werden könne. Aber es gab 
auch Lichtblicke, wie zum Beispiel ei¬ 
nen hoffnungslos überlaufenen Con¬ 
rad-Stand, der in weiser Voraussicht 
nach außen hin abgeschirmt und mit 
nur einem Ein- beziehungsweise Aus¬ 
gang versehen war. Wartezeiten von 30 
Minuten und noch länger mußten in 
Kauf genommen werden. Man möge 
uns verzeihen, daß wir uns nicht in die 
Schlange derer gesellten, die dem Con¬ 
rad-Wahn verfallen waren, sondern an 
diesem Stand vorbeigingen und nach 
weiterem Interessanten suchten. Wer 
etwas mehr Zeit mitbrachte, konnte oh¬ 
ne Aufpreis Vorträge zum Thema Satel¬ 
litenempfang, Viren, Animation und 
DFÜ hören. RalfSchößler 



CPC-Hediikleiir (Jiirowwki le.slei gerade den 
Trojan-Phaser an den “Schein-Amstrads" 
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Der CPC der Zukunft? 

IVas man aus dem CPC alles machen 
kann 

Haben Siezufällig noch die Ausgabe 6/7'90 zur Hand? Wenn ja, dann lesen Sie 
noch einmal den Artikel ab Seite 18. Halten Sie dasalles für Spinnerei? Dann 
lesen Sie nicht weiter, denn was jetzt kommt, ist der Hammer (und ganz sicher 
wahr). 


Wir haben uns in den letzten Wochen 
einmal umgesehen, und nun staunen 
Sie, was wir gefunden haben. Fünf 
CPC-Umbauten. die völlig eigenstän¬ 
dig, und ohne beim Nachbarn zu schie¬ 
len, durchgeführl wurden. 

Der erste Rechner, der vorgestclit wer¬ 
den soll, fällt sofort durch drei Lauf¬ 
werke auf. Mittels eines Schalters kann 
jedes Laufwerk beliebig als Laufwerk 
A: oder B: angesprochen werden. An 
einer Schaltung, die bis zu vier Lauf¬ 
werke unter CP/M und AMSDOS an¬ 
sprechbar machen kann, wird gerade 
gearbeitet. 

In dem Gehäuse findet man noch eine 
5 12-kByte-Speichererweiterung, eine 
Eprom-Karte, ein 32-kByte-RAM- 
ROM und nicht zuletzt noch ein Multi- 
face II. 

Damit nicht immer erst das Gehäuse 
geöffnet werden muß und die Verbin¬ 
dungen gelöst werden müssen, wurden 
an dem Gehäuse noch Schalter ange¬ 
bracht, mit denen alle Erweiterungen 
an- beziehungsweise abgeschaltet wer¬ 
den können. Ein weiterer Ta.ster löst ei¬ 
nen Reset aus, und es kann dank Schal¬ 
ter noch zwischen einem CPC 464 und 
einem CPC 6128 gewählt werden. 

Das achte Druckerbit wurde selbstver¬ 
ständlich auch nicht vergessen. 
Natürlich hat ein solches Gerat auch 
seinen Preis. Die Kosten errechnen sich 
hierwie folgt: 


CPC464 -f-CTM 640 350.- DM * 

Speichererweiterung 512 kByte 240 - DM * 


Bprom-Karle 224 kByte 

8Ü-Track-Laufwerk 

40-Track-Laufwerk Stardrive 

Multifacell 

6128-ROM 

32-kByte-RAM-ROM 

200-Walt-Nelzteil 

Gehäuse 

Materialien wie Schalter. 
Kabel, Stecker usw. 

Gesamt zirka 


150.-DM* 
50,-DM 
lOO.-DM 
60,-DM 
99.-DM* 
40,-DM* 
140,-DM* 
75,-DM 

zirka200DM* 
1504 DM 


(* = neue Teile, alles andere gebraucht) 


Die Dauer des Umbaus betrug in etwa 
sieben Monate, wobei gesagt werden 
muß. daß der CPC heute noch nicht 
hundertprozentig funktioniert. Ge¬ 
genüber den “normalen” CPCs ist er 
auch etwas fehleranfälliger. 

CPC, die zweite 

Ein anderer CPC 6128 wurde auch in 
ein Gehäuse eingebaut und enthält die 
Hauptplatine, eine 512-kByle-RAM- 
Disk, ein 8ü-Track-Laufwerk, eine 
RS232C und zwei auswechselbare 
Festplatten. Die Umbauzeit betrug un- 
gefährdrei Wochen. 

An Material wurden fast nur Neuteile 
verwendet. Der Umbau allein kostete 
rund 250 DM. aber die bereits vorhan¬ 
dene Hardware im Wert von zirka 3400 
DM läßt die Kosten für einen CPC doch 
unheimlich immenserscheinen. 
Natürlich wurde nicht alles auf einmal 
gekauft. Ein Daitscannerund ein extern 
betreibbares Fisher-Technik-Cornpu- 
tinginlerface finden übrigens auch 
noch Platz im Gehäuse. 

Damit nicht so viel umgesteckt werden 
muß, wurde ein Dataswilch mit einge¬ 
baut. 

Ursprünglich sollte auch noch ein 
Eprom-Brenner mit in das Gehäuse ein¬ 
gebaut werden. Dieses Projekt schei¬ 
terte jedoch laut Aussage des Bastlers 
an der Inkompalibilität der HD 20 so¬ 
wie des Eprommers von Dobbertin. 

Als Abschlüsse wurden nur der Moni¬ 
tor, der Joystick (mit Weiche) und der 
Cenironics-Port nach außen gelegt. Die 
Tastatur läßt sich sehr einfach über ein 
Rundkabel oder auch über ein Flach¬ 
band und einen Sub-D-Stecker mit pas¬ 
sendem Gegenstück am Gehäuse 
anschlicßen. Das Ta.siaturkabel an die¬ 
sem Rechncrisl ungefähr 1.7 m lang. 
Und bis jetzt sind noch keine Probleme 
aufgetaucht. Im Innenraum ist darauf 
geachtet worden, daß für eventuell fäl¬ 
lige Reparaturen alle Anschlüsse nicht 
direkt, sondern über Zwischenstecker 



geführt 
wurden. So¬ 
mit ist ein 
problemloser 
Austausch von 
einzelnen Bau¬ 
teilen gewähr¬ 
leistet. 

Bei derVersor- 
gungdereinzelnen 
Komponenten mit 
Strom sollte man 
wenn möglich auf das 
große Netzteil im 
Gehäuse zurückgreifen 
und .so gut wie alles ex¬ 
tern mit Strom speisen 
und nicht mehr überden 
Bus vom CPC. 

CPC als Laptop? 

Irgendwie ist es gelungen, einen 
CPC im Laptop-Gehäuse unter¬ 
zubringen. Die Leistungsmerk¬ 
male zeigen die Besonderheiten 
dieses Rechners: Der Laptop kann 
wahlwei.se über Netzteil oder Auto¬ 
batterie gespeist werden, alle Aus¬ 
gänge sind durchgeführt, auch ein 
Tape-Anschluß fehlt nicht. Im Inneren 


32-kByte-RAM-ROM: 

Micro.stylc,England 

6128-ROM.Multifacen: 

MB-Versand.Köln 

Eprom-Karte, Speichererweitcrung, 
Eprommer, Festplatte HD 20: 

Dobbertin Gmbh, Brühl 

Elekironikteile: 

Westfalia, Conrad, Tennerl 

Literaturhinweis: 

Günter Woigk: Das Schneider CPC Sy¬ 
stembuch, Verlag Sybex 
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bef’indel sich zudem noch eine Vortex- 
Speichererweiterung, die ein- oder aus¬ 
schaltbar ist. Auch zwischen 464 und 
6128 kann man wechseln. Drei weitere 
Taster sind noch nicht belegt, aber 
schon verplant. 

Das Gerät ist voll funktionsfähig (ein 3- 
Zoil-Laufwerk und ein 3,5-Zoll-Lauf- 
werk). man kann es ohne Einschrän¬ 
kungen benutzen. Auch Mode 2 ist 
noch lesbar, trotz des kleineren 
Bildschirms. 

Noch im Umbau befinden sich 
zwei Rechner, die sich sicher 
auch sehen lassen können. 

Bei dem ersten handelte es 
sich ursprünglich um einen 
CPC 464, der folgender¬ 
maßen aufgerüsiel wurde; 

-CPC6128ROM. 

-448-kByle- 
RAM-Disk, 

-zweite 64-kByte- 
Bank, 

-RAM-ROM 
(32-kByte-S- 
Ram.die wie 
zweiROMs 
angespro¬ 
chen 
werden 
kann). 


Der Umbau ist bis heute nicht komplett 
abgeschlossen worden, da noch einige 
Erweiterungen eingebaut werden sol¬ 
len. 

Beim Umbau sollte man übrigens dar¬ 
auf achten, keine einzelnen Kabel zu 
verlegen, sondern versuchen, mög¬ 
lichst viele Kabel z^usammenzubekom- 
men oder am besten Flachbandkabel zu 
benutzen. Dieses hat den Vorteil, daß 


man 


- 80- und 4()-Track-Laufwerke (.5,25 
Zoll), 

- ROM-Box für 7 EPROMs ä 32 kByte. 


im 

Rechner 
nochdie 
Übersicht 
behält und 
leichtverfol¬ 
gen kann, wo 
ein Kabel hin- 
' führt. Auch überdie 
Plazierung von 
Schaltern sollte man 
sich im klaren sein, da 
man sonstein schönes Ka- 
bcigewirr erhält, indem 
man niemalseinen Fehler 
finden kann. Eine generelle 
Anleitung zum Umbau eines 
CPCs in ein PC-Gehäuse kann 
nicht gegeben werden, da dafür die 
Gehäuse zu unterschiedlich sind. 
Aber man sollte auf jeden Fall versu¬ 


chen, die Erweiterungen und auch die 
Verbindungen zu den Schaltern über 
Steckverbindungen zu legen, da man 
dann schneller bestimmte Teile austau- 
schen odereinen Fehlersuchen kann. 
Man sollte beim Umbau lieber davon 
absehen. den Joystick-Port oder irgend 
etwas anderes von der CPC-Haupipla- 
tine auszulöten. Die Bauteile sind so 
gut eingelötet, daß man, wenn man 
nicht genug Erfahrung hat, gleich meh¬ 
rere Leiterbahnen von der Platine löst. 
Kurz zum Gehäu.se: Es sollteein Desk- 
top-Gehäuse mit Klappdeckel benutzt 
werden, da man beim CPC doch häufi¬ 
ger an die ‘inncreien” muß. Sehr gut 
sind alte IBM-Gehäusc, da sie auch 
breit genug sind, um eine 464-Plaiine 
aufzunehmen. 

Vielleicht hat Sie dieser Artikel dazu 
angeregt, auch Ihren CPC etwas zu ver¬ 
schönern. Wir wünschen Ihnen auf je¬ 
den Fall viel Spaß und Erfolg dabei. 

Ein Dank noch an die Bastler der 
Rechner (Wolfgang Noistemig, 
Christian Beckhaus und Michael 
Vogl) für die Hilfe und Unterstüt¬ 
zung bei diesem Artikel. 

Kurz noch eine Bitte an unsere 
Leser: 

Haben auch Sie Ihren CPC 
umgebaut, eventuell ange¬ 
malt oder auf eine andere 
Weise optisch und/oder 
technisch aufgemotzt? 
Wenn dem so ist, was hin¬ 
dert Sie daran, uns ein 
Foto Ihres Rechners zu¬ 
zuschicken und somit 
alle CPC-User an der 
Freude, die Sie an 
Ihrem Gerät haben, 
teilhaben zu las¬ 
sen. 

Senden Sie Ihre 
Unterlagen an: 
Redaktion CPC 
International, 
- CPC-Um- 
bauicn 
Postfach 
250, 3440 
Eschwege 
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Amatrad CPC 464/6128 Plua 


0M39.- 

a.A. 


r..' 

Wir sind Ihr starker 

CPC, Joyce & I 

PC 

Pari 

tner 


tdeater Einslicgscomputer! 

Z80 A Prozessor • »23 KB Horn Carlridgo mii 
AluISDOS • Basic t.» und Action • nennspiel 
Burmin Rubber • DMA • Soundchip • 

CPC 4M Plus mittZ* Monochrom Monitor DU 599,- 
CPC 454 Plus mit >4’Parbmoralor DU 799,- 
CPC 6128 Plus mil 12* Monochrom Monitor DM 799,- 
CPC 6128 Plus mit 14-Farbmonitor DM 1098,- 


Anschtußdes CPC Plus an extcrree Zubehör: 

Floppykabetan FD1 DM48,- Adapiekabelsaiz für MP? 

Adapierfürvorli. Floppykabel DM39,- wesereAdapter 


Extrem preiswert: Amatrad CPC 464 aus Konkuramaaae 


5 Orginalverpackt, mit voller Garantie ! 
j j CPC 454 mit Farbmonitor CTM 644 und 9 Kassettenspielen DM 478,- 
■ Farbmonitor CTM 644 (einzeln) _ DM 398,* 


1 Supercalc nurCPCeizsiPCW.59,80 

! Tabollenkalkulationsprogramm dor Superlative. 
{ Neu Deutsches Handbuch 19,80 


Programmlarapraehen CPC: 


i HiSoft Pascal (3"' Kas-> . 59,80 /39,80 

I Assembler (37Kas.).-....59,80 /39,80 
(inkl. deutschem Hartdbuch) 


Adventurea CPC (ta Text; gs Grafik) 


Di^ani von Rabenlols (g) 

Orachenland (t) 

Reise durch die Zen (t) 

SherlocK Holmes (g, nur 3'Disketie) 

Auftrag In der Bronx (g) 

Insel der Smaragde <t) 

Pharaonengrab (■} 

je 3"-Diskette / Kassette 38,•• / 28,•• 


Grafik auf CPC: 


EASIART + Trackerball.178,-- 

Zeichnen und Konstruieren ma dem Marconl 
Trackerball und dem Gralikprogramm EASI-ART, 
Unschlagbar in Kombination mtl SlopPress II 
EASIART+Trackerball +StopPresS ..348,- 

EASIART Softw. u. Handb.78,- 

Maus mit Grafiksoftware.149,- 


Neu: Spltzendrueker von STAP 


STAR LC 20: klein aber lein! Preiswerter 
9-Nadlermii 4 Schriften, einfache Bedie¬ 
nung. Parkposllion für Endlospapier.498.- 

STAR LC 2410; Professionelle Leislurtg zu 
einem vernünftigen Preis. 24-Nadler mit 

hervorragender Druckqualitai .698,- 

Oruckerkabel 464<e64/612B.39,- 

100 Blatt Endlospapier.29,80 


AORESCOMP. 

.58,- 

DATENREM . 

.68,- 

FAKPJREM . 




LAGDAT. 


TEXTKING. 

.78,- 

COMFORM . 

.48,- 

ETATGRAF. 

.58,- 

FIBUCOMP. 

.98.- 

KALKUREM . 

.78,- 

PflOFlREM. 

.138,- 


Vereinsverwallung .198,- 

Grafik Knüller: 

StopPrcss 

DTP Programm..178. 

StopPress Fonts, 
Clipsrts (nur CPC)... 98,' 
AMX Maus (Joyce).. 248, 
StopPress + 

AMX Maus (Joyce).. 298. 


mit MailMerge 

tfeimeivterT ung 


dBase II für CPC / Joyce (3") 

Jeder PC Besitzer kennt dieses reiaiionale 
Datenbanksystem von ASHTON TATE. Diese 
Software eignet sich zur Lösung aller Anwen¬ 
dungsproblome , wie Lager-, Adressverwalt- 
ur>g, Fakturierung Betriebsabrechnung etc. 

(bis zu 65636 Datensätze) Achtung! CPC 
464 -664 Besitzer benrjiigen eine 64 Kß 
Erweiterung 

Mil deutschem HarxJbuch -| 48,— 

Wordstar 3.0 
MicroPro (ürCPC < Joyce 
Profitieren auch Sie vom Nutzen oiritK 
miltionentach bewahrten Texiverarbeitungs- 
Programms und erledigen Sie alle Schreib¬ 
arbeiten auf eine schnelle und komfortable 
An und Weise. 

464-664 Besitzer benötigen eine 64 KB Er. 

Mn Sericnbrieflunkiion 

Mil deutschem Handbuch yy,— 


Profipregramme aus der 

PC - Welt 


Wir haben den Alleinvertrieb tur dBasell, 
Multiplen, Wordstar 3.0 und Microsoft 
Basic (CPC-»Joyce) von MarA/Ä rechnik 
übernommen l Sollten S>e also Interesse 
an einer durch und durch professionellen 
Software für Ihren CPC oder Joyce 
hcJ^en, dann zögern Sie Keine Sekunde 

Software Paket 


dBase II + Wordstar + MullipUn zum 
sensationellen Paketpreis von 298 — 

Handbuch (auch einzeln erhältlich) 

49,- 

Handleranfragcn erwünscht. 


ideale Computer für den Einsteiger: 

1 mil Grünmoniior GT65. 

.798,- 

: mit Farbmonitor CTM 644 . 

.1098,- 

■: CPC 6128 Konsole einzeln . . 

.698,- 


.. 198,- 

:r Farbmonitor CTM 644 . 

.398,- 


Amor: 

Prowort.198.- 

MAXAM in.198.- 

Pfospell dtsch.79,- 

STAR DIVISION: 

Star-Writer l.90,- 

Datei-Star.98,- 

Siausiic-Star..98.- 

FibuStar Plus CPC.298,- 

CPC-Knüller: 

ROM BOX CPC.118,- 

MICA CPC.98,- 

Terminaistar 3".29,80 

Mim Office fl 3'.98,- 

Dan-Scanner (+).249,- 

Videodigitizer {♦).348,- 

(♦) Adapter CPC 6128 39,- 


xj Supercalc.59,80,- 

iii VanderZalm: 


Wonrtor Kaputt ? 

Wir bieten günstige ge- , 
brauchte G/ünmon/fore. 

Holtywoorf Spiel 3": 
R(K>ocob. Ghosibusisrs II. 

Batman, Indiana J.89,95 

Vokabeltrainer 3‘._..49.- 
Verbentrairtcr 3"-..49,- 

Sonderpreise: 

Bildschirmniler 

lürGT64-65. 

CTM 644-640 . 29.- 

Public Domain: 

Riesen Auswahl an toller 
Software II (Liste anlord.) 

1000 PD (31.je 20 .- 

Abdeckhauben: 

CPC Monitore ... .|o 39,80 

DMP-Drucker.je 29,80 

DDI/FDI/Vorlex .je 19,80 
CPC Konsolen je 24,80 

Joyce MonKor.44,80 

Joyce Tastatur.24,80 

Joyce Drucker.24,80 

3"-Disketten: 

Maxell. Amsoll (10SI) 59.- 
CF2D0 (iosn 98.- 

Diskettenboxen: 


CPC 


Kassettensoftware: 

Easi-Topcafc Kas.29,80 

Basic Lehrbuch Kass 29,80 
Mini Office II Kassette 

Textverarbeilung_49,- 

Hisoft Pascal.39,80 

Asserrbler.39,80 

Programmierspr. 3": 

Hisolt Pascal..59,80 


ArnorC{CPC6128) 225.- 

Turtjo Pascal 3.0. 

...225,- 

Handbücher Deutsch 



AMX-Maus CPC . 

...29.80 

StopPress CPC... 

...19,80 

dk'troncs Erw_ 

...19,80 







464 deutsch . 

.49,- 

6128 deutsch. 

.68.- 

6126 englisch. 

.48.- 

DMP 200 . 

.38.- 


DMP 3000 . 38,- 

DMP 3160 . 38,- 

DMP4000 . 38.- 

lürJbK g; 

AMX-Maus Joyce.19,80 

Mim Office Prof.29,80 

Pubtic Domain Buch 29,80 

MastorScan.19,80 

StopPress Joyce.19,80 

DesKlop Pubtisher ...29,80 

MICA .39,- 

LocoScript2 .59.- 

LocoFile..59,- 


|3’'>Spieie * Relax • Ganz stark I 


Super Games I (4 Spiele).30.- 

Super Games II (4 Spiele).30,- 

; Super Games III (3 Spiele). 30,- 

:i They seid a Million (4 Spiele).30,- 

Game Paket ( aiieobigenis Spiele).100,- 

: Sorcery Plus. 30,- 

CyrusllChess. 49.- 

■i Flugsimulator 3'/Kas.38,-/ 28,- 


r-a.S" /5o. 

....19,80 

5.257100 . 


Schaltpläne: 

464/664/6128. 

je 29,80 



DD1/FD1. 


DMP2XXXr3XXX 
Joyce 8256/8512, 

„,.29,80 

....29,80 


MICR SOFT 
BAStC 


MultlPlan Microsoft CPC f Joyce (3 ") 

Ja. Sie haben richtg gelesen, das bewa*'rte 
TabellenkalKulafionsprogtamm gibt es auch 
für Ihren Computer. Wenn S<e die zeit¬ 
raubende manuelle Verwaltung tabellarischer 
Aufstellungen von Hand sait haben, isl 
Mültiplan genau das Richtige für Sie. 

CPC 464-664 Besitzer benötigen eine 
64 KB Erweiterung CPC 99,— 

Mit deutschem Hb. Joyce 148,** 

Basic-fAssembler CPC eiza, Joyce 

Komplettes EntwcKlungspaket rnit Basic- . 
Compiler 5.4 Basic-Intarpreter 4 .5)und 5.21. 
Macro-Assembler. Link Kinkir>g Lo.ider.Cref 
Cross-Referenc Facility und Lib Library 
Manager. 

Fm Muß für |eden emsihahen Basic-und 
Asserrtiler Programmioror !i CPC 99,— 
Mit deutschem Handbuch Joyce 148,— 









































































































































Kopierprogramme: 


AMSTRAD S^-Laufwerke. 


Mastercopy CPC (3").65,' 

Supercopy cpc/Joyce (3-) 65,- / 85,• 
Supercopy Ist wie der Name schon sagt... 

Disk-Tools (3->.79,• 

Universenes OlsK-Utiliiy. 9 Programoie: 
Formallefen. Kooleren. Analysieren ... 


DD1 (inkt.Contr.)... 396, 

Ein Muß für jeden CPC 46A -Besitzer 
Corttroller (auch einzeln erhältlich) 199, 

FDl (2. Lau(w8rftCPC)3“ 198, 

Achtungl Läuft am CPC 464 nur mit Contr. 
KabeltürFDt nötig lür6t2S/664 49. 

FD4 (2.-EinbauLaufw. Jovcel 3' 398. 


3,5" LW (CPC/Joyce). je 240,- 

Achlur>gi Lauft am CPC 464 nur mit Contr. 
5,25" LW (CPC/Joyce). je 320,- 

Achlungl Lauft am CPC 464 nur mit Contr. 
MetaJIgehause. (Inkl.Kabel anschlußfeitig) 
Diskpara 3,5" / 5,2S " Formalsoftware 78, 


HD 20 (CPC464.'664/6l2a).... 1100. 


e Joyce-Spiele. 

ol Rome.99, 


30 Schach.49,90 


79, 
79. 
79, 
79, 
79. 
79, 

Triangle.79, 

.79, 
39.- 


Ranger 


Adapter (4) 


Farben 


lUchte Joyce 8256, 
geprüft, 3 Monate 
>tle.Preis a.A. 


ijxtrv 


4 Joyce PCW 8256: 

■;! -S'-LaulwerkflSOKB) 
i::j • Ofucker ♦ Texisoflware 
::: 'CPM-Plus und Basic 
-256 KB 998,.. 

■j Amor: 

ArnorC..225,- 

dj C jetzt euch für den Joyce und 
4 CPC 6128. Mit Compiler Linker 
und Editor. 

PROWORT.198,- 

Texivererbcitung mH Recht- 
ili schreibprüf, und Mallmerge 

PROSPELL (dl.) .79,- 

;i: MAXAM II.199.- 

4 Locomotive: 

LocoMaü 1 . 128,- 

v: LocoSaipt 4 Spell.248,- 

STAR DIVISION 

•:! Statistik-Star.98.- 

:;•] Starmail.99,- 

Datei-Star.99.- 

J Mailing-System.169.- 

lä Star-Base.198,- 

'ii Business-Star.299,- 

Fibu-Star Plus.299.- 

I ' • Komenblätier Fibu.35.90 

Loco-Merge.99.- 

Diverses: 

Oatanratorder 4 Kab. 98.- 
Druckerkabel. 6128 . 39.- 
Druckerkabel 464/664 39.- 
Monitorveriangorung: 

...CPC 6128.29,90 

•ij .„CPC464 . 24,50 

4: Drucketverlängerung; 
si (öt Joyce (2 Kabel).... 59,- 
|i Traktor NL0401.58.- 

^ Joysticks 

Ä! Compefitioo pro.39,80 

’i: Quickshol II.19.80 

gi Joyslfckyreicbe 

für 2 Joysticks.39,80 


Joyce PCW 8512: 

•3"-LW{180 4 720 KB) 

■ Drucker 4 Taxtsoftware 
• CPM-Plus und Basic 
•612KB 1398.- 


Joyce 


' Joyce-Knüller: 


Desktop Publishar.... 

. 98,- , 

4 AMX-Maus ( 4 ),. 

298.- i 

MasterScan ( 4 ). 

.298,- ( 

Mini Office Profess... 

.138.- 1 

...Otsch. Zeichensatz 

...29,80 • 

Tasword 8000 . 

. 148,- 1 

Turbo Pascal 3.0. 

.225,- 1 

Turbo Toolbox. 

.148,- 





Prompt Druck. 

...39,- 


...98,- ■ 

Turbo Faktura. 

.148,- i 

Headline.. 

.198,- , 



1 Comac Litbox 4.0. 

.146,- 1 

1 Comac Kasse Plus ... 

.168.- , 

1 Comac-Bankiransfer 

-.59,50 1 

1 Vereinsverwallung... 

.198.- , 

' Schreibtehrgang. 

...89,- 1 

Fleelstreet Edll. 

.148,- , 





lerntrsiner.. 

...79,- 

Drucker: 


StarLC20 (9-N.). 

498,- 

NEC P 20. 

848,- 


Joyce PCW 9512 1698,- 


NEC P60 .1598,- 

Star LC24-10 (24-N.) 698.- 

Farbbänder: 

NLO401/DMP.19,60 

SiarLC 10/20.19,80 

Star LC 24-10.24,80 

LO 35-/NL10/PCW.24.80 

Joyce (Carbon).39,80 

PCW9512.19,80 

StarLC 10.19,80 

Star LC24-tO.24.- 


Zubehör 


Umweltschulzpapier 
Zweckform 1000 Bl.. 24.60 

Endlos 1000 Blatt.29,80 

weiß 

Etiketten 200 Stk 16,- 

70 X 70. für 3' und 3,5' 

Datenübertragung 

Dataphon 2400 b.698,- 

Modem2400 UNP5 .348,- 
Modem 2400 Baud ... 296,- 
Alle Modems sind ohne 
Posizulassung 
Software DFU.25,- 


BTX Modul für CPC 


mit Kabel. keine Sofiware notig.In Verbindung 
mit einem MP 2 auch am TV betreibbar. 
Arrschluß an DBT03 198 " 

■ Handscanner lör PCW e/"" 

ProScan Software insiaJIationsan. in deutsch 
mit englischem Handbuch. 7Qfi - 


Multiface 2 


Sagenhaf tes Kopiermodul I 

- Vollständige Kopieremrlchiung für Kassetten 
und Disketten. 

• Wird auf den Expansionsport ihres CPC 
(464,646 und 6128) aulgestecki. 

- Wahlweise Kopieren von Kas. auf Disk, und 

umgekehrt. 178,— 

Adapter für CPC 6128 (DM 38,-) 


Neuheiten CPC - Joyce 


Joystick Controller Joyce 

69.- 

• Spielen Sie Ihre Joyce Spiele jetzt 
auch mit dem Joystick. 


• Joyce Adapter erforderlich 

39,- 

• Joyce Schnittstelle 

199,50 

Wieder Lieferbar 


CPC Schnittstelle 

Unbeding' erforderlich zur DFL) 

1^99,50 


Wir haben die Lizenz für Kotulla PD-Programme (CPC u. Joyce) | 
mit deutschen Handbüchern übernommen 


Preiswerte Programme für CPC und Joyce • so macht Software Spaß f 


1 JRT-Pascal • vollsfiridigai Pascal-Compiar ‘ 1t 

2 Z80-AssemUer, Oisassembl«, linker, Detumei 12 

1 3 KOnsJiche InitHigenz - XUSP u, E-PROLOG ‘ 13 

4 C-Compile> Small-C-milRlenkommazehlen ' 14 

5 FORTH-63 - Konlorlabler Forlh-Interpreler 15 

6 Uülilies: Oaieikompcassion, Dskmon., Dateirelier... 16 

7 ProgrammeausdemGroßenCPC-Arbeiisbuch'* 17 

8 Adveniuie Colossal CavefPg engl.) * 15 

9 Oisk üblitiea ■ kopieilgeschOtziD Software ** 19 

10 BizBaaic - Umfangreiche Basic-Eiweilerung ** 20 

. / • Auf CPC-464/S64 nur mit Speichererweiterung 


Basic-Compler E-BASlC tot CP'M 
Turbo Pascal-Programme - Turbolnllner, Grafik 
Programme aus Dm Joyce progiemmierett 
ProgrammeausCPC-Oetcivcrwaltung “ 
WordStar-Toofe ' Fußnoten. Index. Spaiiendrudc* 
dBASE-Literarurvctwallung * 

C-Inlarpreler SCI ’ Spdend Cleinen * 
MacroPackZdO ■ MakroasserRtiie>. Debugger. Linket 
OFÜ-Programm MEX-Oaiefiöb«iragung * 
WS-Tuner 


• • Auf CPC-464/S64 nur mit Speichererweiterung (mm. 64 K) " Nicht geeignet für Joyce 
i nur DIVI 25," pro S'-Diskette DM60," für drei beliobige3'-Disketlen 


Speichererweiterungen CPC: 


1 64 KB . 

.149,- 

1 128 KB nicht für 6128 . 

.198,- 

j 256 KB. 

.269,- 


.349.“ 

.! 512 KB . 

.419,- 

:j Joyce 256 KB(mii Elnbauanleh.) 

,128,- 


CPC-Renner von AMSTRAD: 


MP3 ("TV-Tuner"). 199,— 

Aus Ihrem CTM644 - Color-Monlt. wird em 
Farbfernseher. 

CT*1 fRadio-Uhr-Tirner").. 79,— 

Radiowecker mit Elnschlataulomaiik. Passend 
zumCPC-Design. 


Locomotive Software 


LoCoScript2 (Texlverarbeitung) 148,— 

mit deutschem Handbuch 

LocoSpeli2 (Rechlschrebung 168,** 

In deutsch mH engl. Handbuch 

LoeoFile (Datenbank) 168,** 

tur LocoScrpi2 mit deutschem Handbuch. 

Loco Font Set 1 oder 2 79,80 / 66,40 


LoCOMail2 (Senenbriaf) . 168,- 

für LocoScrp12 mit engl, Handbuch. 


Datenübertragung CPM • DOS: 


MINI DOS JOYCE.50.- 

Mit Hilfe dieser Software können Sie aut Ihrem 
Joyce PCW MS-DOS-Dateien lesen, sdireben 
und formatieren. Sie benötigen dazu em 3.S‘- 
oder 5,25" Diskettenlaufwerk 


Karl-Heinz Weeske 
Potsdamer Ring 10 
D-7150 Backnang 

: :)<retsspaf HasseeK:-»BLZ 


pgf % 

7;60i: 

OM {Ausland 19,80 C^}. .. 

Fax:07191-60077 
Tel:: 071^-1528(29), 60076 


■ ■ 

ii:j zurück an Absender ^ * 

: interessiert an weiterem Info- 
i;' material ? Kostenlose Gesamt* 
:! angebotslisten anfordern ! 

;•[ O für CPC 6128.664, 464 
O Joyce / PCW Computer 
i O Spiele CPC / PCW 

O Public Domaine 3-CPC/PCW 

Vorname, Name; 

:;;l Straße, Hausnummer: 

;i| PLZ. Olt: 

;j Tetelon-N», Datum' 

; | Mein Compuiersystem: 

























































































































Programme 


Windows fix im Griff 

Fenstertechnik in eigenen Prograntmen 

Vielen CPC-Programmen fehlt ein wenig professioneller Touch, wie man ihn 
vom PC her gewohnt Ist. Dies liegt jedoch nur daran, daß für MS-DOS-Com- 
puter fast für jeden Zweck schon Routinen vorhanden sind. Damit Sie nun 
Ihre Programme etwas stylen können, hier der Window-Manager, der we¬ 
sentlich mehr kann,als nur Auswahlfenster zu verwalten. 


Bei der Entwicklung eines Window- 
Generators auf dem CPC müssen meh¬ 
rere Aspekte in Betracht gezogen wer¬ 
den. 

Als erstes muß eigenständig erkannt 
werden, ob es sich bei dem CPC um ei¬ 
nen 464 oder aber um einen 664 oder 
6128 handelt. 

Weiterhin ist wichtig, daß die Window- 
Routinen nicht allzuviel des wertvollen 
Speicherplatzes in Anspruch nehmen 
und somit noch genug Speicherplatz 
für das eigentliche Programm vorhan¬ 
den ist. Trotzdem muß darauf geachtet 
werden, die Routinen so sicher wie 
möglich zu gestalten und Fehleingaben 
abzufangen. Alle neuen Befehle lassen 
sich von BASIC aus mit “ON ERROR 
GOTO’' abfragen. Gerade diese Eigen¬ 
schaft macht es auch dem Nur-BASIC- 
Programmierer möglich, Programme 
zu schreiben. Die Nutzung von Win¬ 
dow-Manager beschränkt sich jedoch 
auf Mode 1 und 2. Mode 0 wäre auf¬ 
grund der übergroßen Zeichen nicht 
sinnvoll für eine gelungene Window- 
Steuerung. 

Sieben neue Befehle 

ISETMEMORY 

Dieser Befehl muß nach der Installati¬ 
on des MC-Codes aufgerufen werden. 
Der Aufruf veranlaßt den Window-Ma¬ 
nager dazu, den Bereich vom Himem 
bis hin zu BASIC für die Window-Spei¬ 
cherung zu nutzen, Window-Manager 
setzt hierbei selbständig mit einem 
MEMORY-Befehl die Speicherober- 
genze herab und füllt den freigeworde¬ 
nen Platz mit den Window-Daten. 
Sollten zuvor schon Windows definiert 
worden sein, werden diese nach SET- 
MEMORY nicht mehr beachtet. 

ISETMEMORY,banknr 
Anstatt die Window-Daten im Haupt¬ 
speicher abzulegen, kann der Window- 
Manager auch einen vom Benutzer ge¬ 
wählten Bereich einer Speichererwei¬ 
terung nutzen, “banknr” gibt dabei eine 


Zahl von 0 bis 31 un. die für eine 16 
kByte große Speicherbank steht. Für 
die 6128-User stehen aufgrund der 64 
kByte mehr Speicher die Bänke 0 bis 3 
zur Verfügung. Wenn dieser Befehl be¬ 
nutzt wird, darf der Window-Manager 
nicht im Bereich &4000 bis &7FFF sic¬ 
hen. da dieser Bereich kurzzeitig aus¬ 
geblendet wird. 

lSETMEMORY,start,ende 
Dieser Befehl verwendet für die Win¬ 
dow-Speicherung den mit "Start” und 
"ende” benannten Bereich im 
Hauptspeicher. 

|CHECK,wert 

Normalerwci.se wird über die abgeleg¬ 
ten Daten eine Prüfsumme gebildet. 
Dadurch wird weitgehend ausge¬ 
schlossen, daß die gespeicherten Daten 
nach einem Öffnen verändert werden 
und beim Schließen des Windows der 
Computer abstürzt. Mit ‘‘wert=0” wird 
diese Funktion abgeschaltet (Zeitge¬ 
winn 5 Prozent), “wcrt=r’ schaltet sie 
wieder ein. Beim Einschallen wird die 
Routine CLOSE aufgerufen, um eine 
Ausgangslage zu gewährleisten. 

Der Sinn dieser Routine liegt darin, daß 
bei der Entwicklung eines Programms 
oftmal.s in verschiedenen Speicherbe¬ 
reichen gearbeitet wird und so ein 
Überschreiben der Fensterdaten nicht 
ausgeschlossen werden kann. Sobald 
das Programm jedoch aus der Entwick¬ 
lungsphase heraus ist, kann die Check¬ 
summenbildung im Sinne der Ge- 
.schwindigkeit ausgeschaltet werden. 


|SHADOW,rahmen,schatten 
Hicimit läßt sich festsetzen, welche Far¬ 
be beim nächsten Fenster für den Rah¬ 
men und den Schatten gewünscht wird. 
Die Werte reichen je nach Mode von 0 bis 
I (Mode2)oderObis3(Mode I). 

ISHADOW, matrixl, niatrix2. rah¬ 
men, schatten 

Zusätzlich zu den Farben kann noch ei¬ 
ne Schattenmatrix gewählt werden. Die 
Werte von “matrixl” beziehungsweise 
"matrix2” haben mit der Verknüpfung 
und der Art der Darstellung von Zei¬ 
chen am Bildschirm zu tun. Hierbei 
möchten wir auf die Demo 
(MW3.DEM) auf der DATABOX ver¬ 
weisen. 

|OPEN,paper,pen,x,y,länge,höhe 
Der Computer öffnet an der Position 
“x,y” ein Fenster, welches die angege¬ 
bene Länge und Höhe gemessen in Zei¬ 
chen hat. Das Fenster erhält die Farbe 
"paper” mit der Schreibfarbc “pen”. 
Die Bildschirminformationen unter¬ 
halb des Fensters werden komprimiert 
abgespeichert. 

Je nach Art des Befehls SETMEMORY 
werden die Daten entsprechend abge¬ 
legt und die neuen Obergrenzen des 
Puffers (Himem) korrigiert. 

jOPEN,@txt$,paper,pen,x,y,länge, 
höhe 

Zusätzlich zu den vorhergenannten Ak¬ 
tionen erhält das Window noch einen 
zu.sätzlichen Strich für die Überschrift, 
die sich in der Variablen “txl.S” befin¬ 
denmuß. 

lCLOSE,anz 

Es wird bewirkt, daß "anz” Windows 
entgegen der Reihenfolge beim Öffnen 
der Fenster geschlossen werden. 
Gleichzeitig werden alle Daten eines 
alten Windows #7 wieder aktiv. Falls 
die Routine CHECK angeschaliet ist, 
wird vor dem Schl ießen die Prüfsumme 
verglichen. Sollte ein Fehler auflrcien, 
wird die Routine abgebrochen, und es 


adr+&.‘>2: 

adr+&.S3; 


adr+&78: 

adr+&7A; 

adr+&7C; 

adr+&7E: 

adr+&8(): 


.Anzahl därmtimenuüi geöffneten Fen-Mer 

hier liegen die Spcichcrobergren/.en vom Pul'fer/i limem.in l.ow- beziehuiigswei.se 
Migh-Byle-Fonn. bevor das Fenster geöffnet wurde: dicGiöbedes Berekhs sind 
30 Bytes für 15 Windows 

die aktuelle .Speicherobergrenze (nurbei Pufferbetricb, nicht bei Verwendung des 

Befehls SETMF.MORY ohne Parameter) 

die Spcichcnintergrenze für die Fcnster(nur im Pufferbetricb) 

<>0; Puffcrbcirieb: = 0: Himem wird herabgesetzt 
Speicherobergrenze fürdieFensterbekgtdurch SETMEMORY: 

CI .OSE ohne Parametersetzt den Puffcr/Hiinem auf diesen Wert 
diecodierte Form der Speicherbankmiinmer 


Wichtifie Syslenwdressen für den Window-Manager 
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Programme 


sollte kein weiteres Fenster geschlos¬ 
sen werden. 

ICLOSE 

ICLOSE ohne Parameter schallet alle 
Parameter in den Ursprungszustand 
zurück. Der durch Windows belegte 
Speicher wird wieder l'rcigegeben. 
Falls der Window-Manager beim 
Schließen einen Fehler in den abgeleg¬ 
ten Window-Daten entdeckt hat, kann 
so die Arbeit fortgesetzt werden, ohne 
das System neu zu starten. 

lINVERS,x,ydängc 

Dieser Befehl set/t an die Position 


“x,y” einen inversen Balken mit anzu¬ 
gebender Länge. Hiermit kann auf ein¬ 
fache und schnelle Weise eine 
Menüführung programmiert werden. 
Näheres entnehmen Sie bitte der Demo. 

IIN VERS,matrix,x,y,länge 
Es kann zusätzlich eine Verknüpfungs¬ 
matrix angegeben werden. Dies ist zum 
Beispiel im Mode 1 von Vorteil, da .so 
bestimmte Farbkombinalionen herge¬ 
stellt werden können. 

|CHAR,x,y,<®werl 

Dieser Befehl wurde speziell für die 
464-Besitzer geschrieben. Er setzt den 


Cursor an die Position “x,y” und testet 
die Stelle auf ein ASCII-Zeichen. Falls 
es identifiziert werden konnte, steht in 
“wert” diejeweilige ASClI-Nummcr. 

Flexible Programmierung 

Mit dem dritten Listing wird es mög¬ 
lich, den Window-Manager an eine an¬ 
dere Speicheradresse an/.upassen. Soll¬ 
te also der vorgesehene Bereich für den 
Window-Manager schon von anderen 
Routinen genutzt werden, kann er da¬ 
mit schnell in einen anderen Bereich 
geschoben werden. 

Alfred Roßmadl/rs 


100 ' Windowmanager (Laderoutine) 

110 ' CPC 464(plus)/664/6128(plus) 

120 ' (c) 1992 Alfred Rossmadl 
130 ' & CPC International 

140 '- 

150 POKE &ÄCO0,l 
160 sermode»! 

170 adr=&A000'Startadr Windowinanager 
180 IF adr<0 TUEN adr=adr+2''16 
190 adr2=adr+38 
200 ' 

210 'Der Speicherinhalt von adr+15 
220 'muss angepasst worden seinl 
230 ' 

240 SYMBOL AFTER 256'syTnbols loeschen 
250 MEMORY adr-1 
260 ' 

270 file$="wm3-'’ 

280 wert*PEEK(&BB4F} 

290 IF wert»=&78 THEN fileS=fileS+”464.bin" 
300 IF wert=&70 THEN fileS=fileS+"664.bin" 
310 TF wert=&74 THEN fileS=file$+"6128.bin 

tf 

320 LOAD fileS,adr 

330 'Falls durch ANPASSER noch 

340 'nicht geschehen: 

350 POKE adr+15,adr2-INT(adr2/256)*256 
360 POKE adr+16,INT(adr2/256) 

370 CALL adr'Befehle einbinden 
380 CLOSEIN:'I/O-Buffer vernichten 
390 CLS:PRINT''WindowManager ist installier 
tI":NEW 


[ 2200 ] 

[1940] 

[1837] 

[2118] 

[1416] 

[269] 

[1410] 

[1778] 

[1244] 

[454] 

[1171 

[3568] 

[2699] 

[117] 

[2199] 

[160] 

[117] 

[729] 

[1062] 

[1399] 

[2598] 

[2572] 


[475] 

[1594] 

[1479] 

[956] 

[1057] 

[ 2112 ] 

[1176] 

[3969] 


1 ' WindowManager (Datengenerator) 

2 ' CPC 464(plus)/664/6128(plus) 

3 ' (c) 1992 Alfred Rossmadl 

4 ' & CPC International 

5 t - 

6 summe=255:zeilennr=100 

7 MEMORY &9PFF 

8 FOR adr-&A0O0 TO &A5A0 

9 READ byte 

10 IF byte>255 THEN GOSUB 31:GOTO 12 

11 summe=summe XOR byte:POKE adr,byte 

12 NEXT:READ byte:GOSUB 31 

13 PRINT 

14 wert=PEEK(SBB4F) 

15 PRINT"Anpassung an CPC 

16 IF wert=&78 THEN cpcS="464":GOTO 27' 

17 IF wert=&70 THEN cpcS="664" 

18 IF wert=S74 THEN cpc$="6128" 

19 '664 S 6128 

20 POKE &A0B6,S.5E:P0KE &A169,&A3 

21 POKE SiA16A,&B6:POKE SA1AA,S5E 

22 POKE &A31B,&A3:POKE &A31C,&B6 
2.3 POKE &A434,&EB:POKE &Ä435,Si23 

24 POKE ScA43B,S8:POKE &A43C,&F8 

25 POKE 5tA45A,&55:POKE &A45B,S>CB 

26 IF wert=&70 THEN POKE SA45A,&5a'664 


3402] 

1940] 

1837] 

2118] 

1495] 

1424] 

134] 

1014] 

703] 

1383] 

2602] 

1519] 

,361] 

1062] 

2147] 

951] 

,1717] 

1831] 

928] 

;2128] 

596] 

:il54] 

:ill6] 

;1115] 

;i558] 

:i512] 


27 PRINT epeS" ist vollstaendig!" [1667] 

28 PRINT''Bitte Disk einlegen!"rWHiLE INKEY [50ii] 
S<>"":WEND:CALL &BB06 

29 fileS="wm3-"+cpcS [996] 

30 SAVE file$,b,&AOOO,&5Al:END [1868] 

31 REM [272] 

32 REM Pruefen einer Zeile [2106] 

33 REM [272] 

34 suinme=suinme+256 [840] 

35 IF summeobyte THEN PRlNT"Fehler in"zei [4054] 
lennr"oder in Zeile davorJ":END 

36 PRINT"Zeile";zeilennr [1691] 

37 zeilennr=zeiiennr+l [1413] 

38 summe=(suiTiine-256) XOR zeilennr [1085] 

39 adr=adr-l:RETURN [616] 

40 ' [117] 

41 'Datazeilen ohne 'RENUM' abtippen! [2904] 

42 ' [117] 

100 DATA 1,15,160,33,78,160,205,209,386 [1937] 

101 DATA 188,62,201,50,0,160,201,38,465 [1549] 

102 DATA 160,195,129,160,195,225,160,375 [1019] 

103 DATA 195,251,160,195,30,161,195,311 [1051] 

104 DATA 87,163,195,66,165,195,142,450 [1089] 

105 DATA 165,83,69,84,77,69,77,79,82,276 [1892] 

106 DATA 217,67,72,69,67,203,83,72,65,315 [1215] 

107 DATA 68,79,215,79,80,69,206,67,76,279 [1908] 

108 DATA 79,83,197,73,78,86,69,82,211,311 [1363] 

109 DATA 67,72,65,210,0,0,0,0,0,0,0,0,450 [2077] 

110 DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,428 [1982] 

111 DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,451 [1995] 

112 DATA 0,0,0,0,0,170,85,0,0,0,0,0,0,332 [1507] 

113 DATA 0,0,0,245,50,124,160,151,50,387 [2058] 

114 DATA 82,160,62,201,50,92,164,241,463 [1174] 

115 DATA 40,35,61,221,102,3,221,110,2,387 [1597] 

116 DATA 204,191,160,61,194,66,164,317 [1454] 

117 DATA 229,237,82,210,70,164,33,122,377 [1653] 

118 DATA 160,193,113,35,112,33,120,277 [1816] 

119 DATA 160,115,35,114,24,4,237,91,330 [1299] 

120 DATA 123,174,33,126,160,115,35,328 [1026] 

121 DATA 114,201,123,254,32,210,70,443 [1463] 

122 DATA 164,71,230,3,79,120,230,28,7,269 [1611] 

123 DATA 177,246,196,50,128,160,62,58,483 [1710] 

124 DATA 50,92,164,62,1,33,0,64,17,282 [1303] 

125 DATA 255,127,201,61,194,66,164,1,310 [1240] 

126 DATA 201,126,123,183,40,8,30,255,498 [1910] 

127 DATA 205,87,163,1,174,125,33,41,366 [1678] 

128 DATA 164,112,35,113,201,214,2,40,349 [1621] 

129 DATA 17,214,2,194,66,164,33,118,362 [1596] 

130 DATA 160,221,126,6,119,35,221,126,282 [1963] 

131 DATA 4,119,221,126,2,50,114,160,427 [1224] 

132 DATA 123,205,44,188,50,117,160,494 [1423] 

133 DATA 201,214,6,50,125,160,40,4,61,396 [2086] 

134 DATA 194,66,164,205,11,188,124,296 [1529] 

135 DATA 181,33,254,163,194,238,163,489 [855] 

136 DATA 221,229,6,4,221,126,0,183,335 [1799] 

137 DATA 202,70,164,221,35,221,35,16,510 [1755] 

138 DATA 243,221,225,205,92,164,205,323 [1602] 

139 DATA 23,188,121,221,150,4,218,70,457 [1612] 

140 DATA 164,147,218,70,164,123,60,7,266 [1426] 

141 DATA 7,7,50,116,160,198,4,205,198,424 [1455] 

142 DATA 187,213,229,95,58,56,179,245,438 [1672] 

143 DATA 4,221,126,2,198,2,79,120,221,434 [1771] 

144 DATA 150,6,218,70,164,185,218,70,431 [1587] 


6/7’92 CPC 15 


















Programme 


145 DATA 164,205,17,188,121,32,1,7,50,407 

146 DATA 115,160,60,79,67,58,82,160,302 

147 DATA 22,0,95,60,254,16,210,74,164,282 

148 DATA 245,33,83,160,25,237,90,58,317 

149 DATA 124,160,237,91,120,160,183,429 

150 DATA 32,4,237,91,123,174,115,35,300 

151 DATA 114,213,197,221,102,6,37,221,412 

152 DATA 110,4,45,197,205,26,188,193,300 

153 DATA 124,198,32,103,229,213,123,259 

154 DATA 214,14,48,1,21,95,229,197,6,284 

155 DATA 0,205,251,164,193,226,205,38,478 

156 DATA 188,16,242,205,220,163,62,7,407 

157 DATA 205,180,187,205,105,187,229,306 

158 DATA 193,225,43,43,112,43,113,43,397 

159 DATA 114,43,115,43,229,205,120,323 

160 DATA 187,235,225,114,43,115,43,339 

161 DATA 205,147,187,119,43,205,153,287 

162 DATA 187,119,43,229,221,126,10,95,329 

163 DATA 205,44,188,50,113,160,123,303 

164 DATA 205,150,187,58,114,160,205,334 

165 DATA 222,187,221,126,8,205,144,376 

166 DATA 187,225,209,193,115,43,114,446 

167 DATA 43,112,43,235,229,197,6,0,420 

168 DATA 205,109,164,193,225,229,197,264 

169 DATA 205,45,163,193,225,205,38,297 

170 DATA 188,16,235,225,229,19,19,237,301 

171 DATA 82,235,225,115,43,114,43,205,27'4 

172 DATA 41,164,119,241,50,82,160,205,440 

173 DATA 97,164,221,102,6,221,110,4,474 

174 DATA 221,126,2,237,71,61,132,87,401 

175 DATA 221,126,0,61,133,95,58,125,317 

176 DATA 160,183,40,38,229,213,205,361 

177 DATA 102,187,221,102,13,221,110,256 

178 DATA 12,70,35,94,35,86,237,87,144,474 

179 DATA 31,60,103,46,1,205,117,187,257 

180 DATA 26,19,205,90,187,16,249,209,424 

181 DATA 225,44,44,205,102,187,205,26,315 

182 DATA 188,4,4,22,0,221,94,6,29,203,372 

183 DATA 35,203,18,16,250,62,26,221,298 

184 DATA 150,4,38,0,111,6,4,203,37,421 

185 DATA 203,20,16,250,6,10,43,16,253,483 

186 DATA 229,213,205,234,187,205,35,283 

187 DATA 164,58,115,160,95,6,3,203,35,351 

188 DATA 203,18,16,250,27,213,213,205,262 

189 DATA 249,187,205,35,164,37,58,116,472 

190 DATA 160,214,2,7,48,1,37,47,111,321 

191 DATA 205,249,187,205,35,164,209,490 

192 DATA 123,47,95,122,47,87,19,205,509 

193 DATA 249,187,225,209,227,205,246,406 

194 DATA 187,209,58,125,160,183,40,19,341 

195 DATA 213,205,35,164,6,30,43,16,298 

196 DATA 253,205,237,187,205,35,164,450 

197 DATA 209,205,249,187,241,50,56,418 

198 DATA 179,225,209,195,192,187,35,380 

199 DATA 35,13,205,66,163,35,13,32,439 

200 DATA 249,201,13,120,254,5,56,239,278 

201 DATA 58,113,160,119,35,13,32,251,438 

202 DATA 58,116,160,214,4,184,216,253,477 

203 DATA 33,118,160,120,230,1,40,2,340 

204 DATA 253,35,58,117,160,174,253,506 

205 DATA 166,0,174,119,201,40,123,61,495 

206 DATA 194,66,164,123,183,200,58,82,361 

207 DATA 160,183,200,62,7,205,180,187,386 

208 DATA 205,92,164,67,58,82,160,183,347 

209 DATA 40,90,197,61,22,0,95,50,82,297 

210 DATA 160,33,83,160,25,237,90,94,377 

211 DATA 35,86,213,235,94,43,86,43,489 

212 DATA 229,205,41,164,150,33,12,164,391 

213 DATA 32,89,225,70,43,78,43,86,43,447 

214 DATA 94,43,229,197,225,205,102,374 

215 DATA 187,225,86,43,94,43,235,205,469 

216 DATA 117,187,26,27,205,144,187,26,318 

217 DATA 27,205,150,187,235,94,43,86,468 

218 DATA 43,78,43,235,229,205,224,164,455 

219 DATA 225,205,38,188,13,32,245,209,419 

220 DATA 193,16,160,205)220,163,195,383 

221 DATA 97,164,151,50,82,160,237,91,390 

222 DATA 126,160,58,124,160,183,40,82,429 

223 DATA 42,122,160,237,82,48,97,237,385 

224 DATA 83,120,160,201,151,229,205,412 

225 DATA 180,187,225,126,35,205,90,345 

226 DATA 187,183,32,248,24,80,83,99,279 

227 DATA 114,111,108,108,32,69,114,510 

228 DATA 114,111,114,58,0,87,105,110,287 

229 DATA 100,111,119,32,109,101,109,451 

230 DATA 111,114,121,32,99,104,97,110,357 

231 DATA 103,101,100,58,0,151,87,95,321 

232 DATA 103,111,201,125,174,43,27,71,460 

233 DATA 122,179,120,32,247,201,0;0,394 


[1697] 

[1062] 

[1087] 

[1866] 

[1679] 

[1617] 

[1615] 

[1235] 

[1330] 

[1903] 

[1843] 

[1625] 

[1819] 

[1543] 

[1761] 

[1514] 

[2091] 

[1923] 

[2025] 

[1374] 

[1912] 

[1233] 

[1604] 

[1226] 

[1641] 

[1554] 

[1179] 

[1712] 

[1848] 

[1340] 

[1632] 

[1138] 

[1431] 

[1805] 

[1450] 

[1882] 

[1558] 

[1564] 

[1418] 

[1948] 

[2245] 

[1999] 

[1890] 

[2214] 

[1324] 

[1224] 

[1460] 

[2219] 

[1709] 

[2435] 

[1967] 

[1336] 

[1753] 

[1217] 

[1914] 

[1603] 

[1377] 

[818] 

[1423] 

[1336] 

[1138] 

[1531] 

[1991] 

[1779] 

[1270] 

[1145] 

[1951] 

[1938] 

[1730] 

[1593] 

[1443] 

[1501] 

[1289] 

[1566] 

[1329] 

[1381] 

[2266] 

[1391] 

[1355] 

[1123] 

[1254] 

[1571] 

[1479] 

[1570] 

[1961] 

[1704] 

[992] 

[1178] 

[1704] 



[2209] 

[2178] 

[1078] 
[1554] 
[1361] 
[1463] 
[1614] 
[1320] 
[1235] 
[2011] 
[1563] 
[2295] 
[1086] 
[1761] 
[1450] 
[2023] 
[1582] 
[1599] 
[2030] 
[1358] 
[1908] 
[1406] 
[2030] 
[1731] 
[1775] 
[1670] 
[1636] 
[1343] 
[1929] 
[1236] 
[1932] 
[1502] 
[1995] 
[2106] 
[1707] 
[1939] 
[1696] 
[1825] 
[1354] 
[2036] 
[2120] 
[2159] 
[1102] 
[1394] 
[1311] 
[596] 


100 ' WindowManager (Anpasser) [2365] 

110 ' CPC 464(plus)/664/612a{plus) [1940] 

120 ' (c) 1992 Alfred Rossmadl [1837] 

130 ' & CPC International [2118] 

140 ' - [1408] 

150 POKE &AC00,1 [269] 

160 MODE 1 [506] 

170 PRINT STRING$(40,"-"); [1432] 

180 PRlNT”Anpassung w3.6 nach speichervers [6669] 

chiebung"; 

190 PRINT STRINGS(40,[1432] 
200 PRINTtPRINT [743] 

210 PRINT"Der Window-Manager v3.6 muss nac [4290] 

h dem" 

220 PRINT"Verschieben im Speicher durch ei [3583] 
nen" 

230 PRINT"Relocator neu angepasst werden!" [3489] 

240 PRINT [361] 

250 lNPUT"Startadresse des Managers";adr [3849] 

260 PRINT [361] 

270 INPUT"Name der Datei";file$ [1711] 

280 IF adr<0 THEN adr=adr+2''16 [1244] 

290 adr2aadr+38 [454] 

300 SYMBOL AFTER 256'symbols loeschen [2199] 

310 MEMORY adr-1 [160] 

320 OPENOUT"dummy";MEMORY HIMEM-1;CLOSEOUT [2303] 

330 'Ein-/Ausgabepuffer Tape/Disk [2088] 

340 LOAD fileS,adr [475] 

350 POKE adr+15,adr2-INT(adr2/256)*256 [956] 

360 POKE adr+16,INT(adr2/256) [1057] 

370 PRINT [361] 

380 PRINT"Fertig." [1246] 

390 INPUT"Nanie der neuen Datei";file$ [2678] 

400 SAVE fil8$,b,adr,1441 [1439] 
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Vom CPC, der auszog,... 

... um ein Spectrum zu werden 

Wer kennt ihn nicht,den ZX-Spectrum,einen der am meisten verkauften 
8-Bi,t-Computer? Befindet sich sogareiner in Ihrem Besitz, so können Sie nun 
mit der vorhandenen Spectrum-Software auch auf dem CPC etwasanfangcn. 


Daß der Spectrum nicht nur einer der 
meistvcrkauften 8-Bit-Computer ist, 
sondern daß für ihn auch mehr Soft¬ 
ware als für andere Systeme existiert, 
sollte sich jeder zunutze machen kön¬ 
nen. Da der CPC und auch der Spec¬ 
trum die Daten auf eine Kassette spei¬ 
chern können, bietet es sich geradezu 
an, die Daten über dieses Medium auf 
den CPC zu transferieren. Da gibt es 
aber leider ein kleines Problem. Die 
Aufzeichnungsart der Speclrum-Soft- 
ware unterscheidet sich von der des 
CPC. Deshalb muß eine neue Laderou¬ 
tine her, die es ermöglicht, die Auf¬ 
zeichnungen des Spectrum zu ent¬ 
schlüsseln. 

Gut gemixt - per RSX 

Spectrum-Transfer hat dies - und noch 
vieles mehr-anzubieten. Alle Funktio¬ 
nen wurden mit mehreren RSX-Befeh- 
len versehen, so daß Sie direkt von BA¬ 
SIC aus mit diesen Routinen arbeiten 
können. 

|CAT ist das Äquivalent zu dem Befehl 
CAT. Lediglich wird in den Spectrum- 
Modus geschaltet. Nachdem die Kas¬ 
sette eingelegt ist, erscheint die Dateili¬ 
ste in folgender Form auf dem Bild¬ 
schirm: 

# Blocknummer, 

# Dateiname, 


# Dalciart(BASIC,CODE), 

# Startadresscund 

# Dateilänge 

|LOAD(,adr) ermöglicht es, Spec- 
Irum-Dateien in den Speicher des CPC 
einzulesen. Auch hier werden die unter 
ICAT angegebenen Daten auf dem 
Bildschirm dargestellt. Wird kein Para¬ 
meter an den Befehl angehängt, lädt 
Spectrum-Transfer die Daten ab der 
Speicheradresse &2000. 

IVERIFY kontrolliert, ob auf der Spec- 
Irum-Kassette ein Lesefehler auftritt. 
Ansonsten wird die Meldung 
“...Checksum O.K.” au.sgegeben. 

Bei |LIST handelt es sich um einen be¬ 
sonderen Leckerbissen. Wurde ein B A- 
STC-Programm mittels ILOAD in den 
Speicher geladen, können Sie das Pro- 
grammlisling auf dem Bildschirm aus¬ 
geben. 

|LLIST hat die gleiche Funktion wie 
ILIST, gibt Jedoch das Listing nicht auf 
dem Bildschirm, sondern auf dem 
Druckeraus. 

|SAVE speichert ein geladenes Spcc- 
trum-BASIC-Programm im ASCIl- 
Format auf einen Datenträger. Es kann 
dann mittels LOAD “name” wie ein 
CPC-BASIC-Programm in den Spei¬ 
cher geladen und an das CPC-BASIC 
angepaßt werden. 

|DUMP(,adr) zeigt den Speicherinhalt 
ab der Adresse “adr”. Wird keine 


Adresse genannt, nimmt derCPC auto¬ 
matisch &2000 an. Die Ausgabe er¬ 
folgt, wie von anderen Speichermoni¬ 
toren her bekannt, in der Form: Adres¬ 
se, 8 Hexwerte und 8 entprechende AS- 
Cll-Zeichen. 

|SCREEN,par zeigt einen geladenen 
Spectrum-Screen auf dem Bildschinn 
des CPC an. Der Parameter (par) muß 
unbedingt eingegeben werden. Er be¬ 
stimmt den Bildschirmmodus, in dem 
das Bild angezeigt werden soll. Wich¬ 
tig ist hierbei noch, daß der ZX-Spec- 
trum mit einem Bildschirmraster aus 
256x176 Pixeln und 16 verschiedenen 
Farben arbeitet. Der CPC kann Jedoch 
nicht so viele Farben darstellen, daher 
muß man sie durch den IMASK-Befehl 
mit verschiedenen Rastern simulieren. 
Der Parameter für den ISCREEN-Be- 
fehl kann folgendermaßen aussehen: 

1: DasBild wird in Mode 1 mitvierFar- 
ben gezeigt. 

2: Das Bild wird in Mode 2 angezeigt 
und in horizontaler Richtung kompri¬ 
miert. 

3: Bildschirmdarslellungin Mode2 oh¬ 
nehorizontale Kompression 
ISAVE.SCR speichert den Bildschirm 
im CPC-Format auf einen Datenträger. 
Ebenso wie bei ISAVE muß hier noch 
nachträglich der Dateiname eingege¬ 
ben werden. 

|MASK,parl...,par8 bestimmt die 
Masks (genau wie bei dem BASIC-Be- 
fehl) für die acht Speefrum-Farben. 
Durch verschiedene Rasterungen kön¬ 
nen so alle Farben schwarzweiß simu¬ 
liert werden. 

iHELP zeigt eine Liste aller Befehle 
auf dem Bild.schirm an. 

Wenn Sie mit dieser Erweiterung arbei¬ 
ten, sollten Sie einige Dinge beachten. 
So zum Beispiel, daß Sie lediglich mit 



Das Titelbild vofi "Motor Bike Madness” au/dem CPC ... 


sieht dem konvertierten Specirum-Titelbild ziemlich ähnlich 
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nicht kopiergcschützter Software ar¬ 
beiten können. Da viele Hersteller von 
Spectrum-Sollware ihre Programme 
mit Kopierschutz versehen, kann das 
eine oder andere Programm nicht mit¬ 
tels ILOAD in den Speicher geladen 
werden. Dies liegt unter anderem dar¬ 
an, daß die Hersteller ebenso wie beim 
CPC andere Aufzeichnungsformen für 


die Daten wählen und lediglich eine 
kurze Laderoutine im normalen Datei¬ 
format vorliegt. Diese Routine biegt 
dann die Original-Laderoutinen so um. 
daß auf die nachfolgenden Daten zuge¬ 
griffen werden kann. 

Da unsere RSX-Erweiterung jedoch 
nicht eine Emulation des Spectrum- 
Rechners bereitstelU. sondern vielmehr 


zum Konvertieren von Spectrum nach 
Amstrad genutzt werden soll, kann auf 
diese “verschlüsselten” Daten nicht zu¬ 
gegriffen werden. 

Vielleicht hat ja jemand schon einmal 
etwas in dieser Richtung probiert? 
Schicken Sie uns Ihre Ergebnisse zu, 
damit auch die anderen Leser etwas da¬ 
von haben. PetrPotuznik/rs 


[636] 

[1940] 

[601] 

[2118] 


[505] 

l>RINT "RSX-KoraniandoE installiert";PRIN [4211] 


100 ' SPECTRUM.BAS 
110 ' CPC 464(plus)/664/6128(plus) 

120 ' (c) 1992 Petr Potuznik 
130 ' & CPC International 

140 IF HIMEM>36863 THEN MEMORY &8FFF:LOAD" [4769] 
Spectrum. bin",St9000:CÄLL &9000 
150 IHELP 
160 P! 

T 


100 ' SPECTRUM.LAD [1010] 

110 ' CPC 464(plus)/664/6128(plus) [1940] 

120 ' (c) 1992 Petr Potuznik [601] 

130 ' & CPC International [2118] 

140 MEMORY &8FFF [207 ]. 

150 FOR adr=&9000 TO &9C9B STEP 11 [1430] 

160 FOR i=adr TO adr+ lO [979] 

170 READ bs [315] 

180 byte=VAL("&"+bS) [465] 

190 POKE i,byte [294] 

200 NEXT i [375] 

210 NEXT adr [547] 

220 SAVE"spectrum.bin",b,&9000,&C9B [1719] 

230 END [110] 

240 DATA 01,09,90,21,61,90,C3,D1,BC,2C,90 [1610] 

250 DATA C3,22,91,C3,D6,94,C3,25,95,C3,C0 [2550] 

260 DATA 91,C3,AA,90,C3,CA,93,C3,EF,93,C3 [944] 

270 DATA 0C,93,C3,9B,96,C3,AB,93,C3,A0,99 [1950] 

280 DATA 43,41,D4,4C,4F,41,C4,56,45,52,49 [2294] 

290 DATA 46,D9,53,43,52,45,45,CE,44,55,4D [2278] 
300 DATA D0,53,41,56,C5,4C,49,53,D4,4D,41 [2450] 

310 DATA 53,CB,53,41,56,45,2E,53,43,D2,4C [1704] 

320 DATA 4C,49,53,D4,48,45,4C,D0,00,61,90 [1317] 

330 DATA 09,90,1A,13,CB,7F,CB,BF,CD,5A,BB (I960] 

340 DATA 28,F5,C9,CD,86,90,3E,3A,CD,5A,BB [2041] 

350 DATA C3,FC,90,3E,0D,CD,5A,BB,3E,0A,C3 [1471] 

360 DATA 5A,BB,E5,7C,CD,91,90,7D,CD,9l,90 [2729] 

370 DATA E1,C9,F5,0F,0F,0F,0F,CD,9A,90,F1 [1753] 

380 DATA F5,E6,OF,FE,OA,38,02,C6,07,C6,30 [1806] 

390 DATA CD,5A,BB,F1,C9,FE,02,30,56,DD,6E [1748] 

400 DATA 00,DD,66,01,3D,28,03,21,00,20,CD [1507] 
410 DATA 71,90,06,08,E5,7E,CD,91,90,CD,FC [1346] 
420 DATA 90,23,10,F6,CD,FC,90,El,06,08,7E [1674] 
430 DATA CB,BF,FE,20,30,02,3E,2E,CD,5A,BB [2842] 

440 DATA 23,10,F1,CD,1B,BB,CD,7C,90,30,D3 [1442] 

450 DATA CD,06,BB,FE,FC,20,CC,3E,07,C3,5A [1772] 

460 DATA BB,CD,5A,BB,10,FB,C9,CD,FC,90,F5 [1481] 

470 DATA 3E,20,CD,5A,BB,P1,C9,11,00,9A,C3 [876] 

480 DATA 65,90,11,19,9A,C3,65,90,11,2F,9A [2066] 

490 DATA C3,65,90,11,A2,9A,C3,65,90,11,BA [2341] 

500 DATA 9A,C3,65,90,B7,C2,04,91,DD,21,9B [2212] 

510 DATA 9C,11,13,00,3E,FF,32,76,96,BF,37 [722] 

520 DATA CD,3C,95,CD,46,96,CB,57,CO,CD,42 [1899] 

530 DATA 91,18,E4,DD,21,9B,9C,11,7B,96,CD [1268] 

540 DATA 65,90,DD,7E,00,CD,91,90,CD,F9,90 [1419] 

550 DATA B7,28,07,06,16,3E,8F,C3,F3,90,DD [1412] 

560 DATA 23,DD,E5,E1,06,OA,23,7E,FE,20,30 [1047] 

570 DATA 02,3E,2E,CB,7F,28,02,3E,3F,CD,5A [2268] 

580 DATA BB,10,ED,CD,FC,90,DD,7E,00,B7,11 [1716] 

590 DATA 89,96,28,0C,11,8F,96,3D,28,1E,3D [949] 

600 DATA 28,1B,11,95,96,CD,65,90,DD,6B,0D [1398] 

610 DATA DD,66,OE,CD,31,93,CD,FC,90,DD,6E [1046] 
620 DATA OB,DD,66,0C,C3,31,93,CD,65,90,DD [2461] 
630 DATA 7E,OE,FE,20,30,02,3E,2E,CD,5A,BB [2362] 
640 DATA CD,F9,90,CD,FC,90,18,DD,FE,02,D2 [2720] 
650 DATA 04,91,B7,CA,10,91,DD,5E,00,DD,7E [1638] 

660 DATA 01,21,00,20,B7,C2,16,91,7B,3D,FE [1389] 

670 DATA 03,D2,16,91,B7,CA,54,92,F5,E5,3E [1728] 

680 DATA 02,CD,OE,BC,El,Fl,11,08,CO,06,CO [2202] 
690 DATA C5,F5,ES,D5,30,20,07,01,20,00,ED [2570] 


700 DATA BO,18,0F,O6,2O,EB,C5,lA,CD,24,92 [1868] 

710 DATA CD,24,92,13,CI,10,F4,Dl,CD,31,92 [2559] 

720 DATA El,CD,40,92,Fl,CI,10,07,21,00,CO [1043] 
730 DATA 11,00,40,01,FF,3F,ED,BO,C9,06,04 [941] 

740 DATA 07,F5,CB,16,F1,CB,16,10,F7,23,C9 [1317] 

750 DATA 7A,C6,08,57,DO,D6,40,57,7B,C6,50 [2246] 

760 DATA 5F,D0,14,C9,4C,24,7C,E6,07,C0,79 [1587] 

770 DATA E6,F8,67,7D,C6,20,6F,D0,7C,C6,0a [1940] 

780 DATA 67,C9,E5,01,FF,17,09,E5,3E,01,CD [1386] 

790 DATA OE,BC,FD,El,DD,21,02,93,CD,DC,92 [1438] 

800 DATA 21,Oa,CO,Dl,F3,D9,2E,03,26,08,lE [2555] 

810 DATA 20,16,08,D9,1A,E6,FO,47,OF,OF,OF [2287] 

820 DATA 0F,B0,47,DD,7E,OO,B0,A8,4F,DD,7E [1658] 

830 DATA 01,AO,B1,77,23,1A,E6,OF,47,OF,OF [1665] 

840 DATA OF,OF,BO,47,DD,7E,00,BO,A8,4F,DD [1963] 

850 DATA 7E,01,A0,B1,77,2B,14,7C,C6,08,67 [2401] 

860 DATA F3,D9,15,20,C7,D9,7A,D6,08,57,13 [2061] 

870 DATA 7C,D6,40,67,23,23,CD,DC,92,D9,1D [2438] 

880 DATA C2,74,92,D9,01,10,00,09,D9,25,C2 [1678] 

890 DATA 72,92,D9,7A,C6,07,57,D9,2D,C2,70 [1892] 

900 DATA 92,D9,FB,C3,18,92,FD,23,FD,7E,00 [2184] 

910 DATA F5,CD,F3,92,32,03,93,F1,1F,1F,1F [1576] 

920 DATA CD,F3,92,32,02,93,C9,S5,C5,E6,07 [1660] 

930 DATA 21,04,93,4F,06,00,09,7E,C1,E1,C9 [1182] 

940 DATA 00,00,00,00,FO,FO,FF,FP,OF,OF,PE [2170] 

950 DATA 08,DA,10,91,C2,04,91,FD,21,04,93 [1944] 

960 DATA 06,0a,DD,7E,0E,DD,2B,DD,2B,PD,77 [1938] 

970 DATA 00,FD,23,10,F2,C9,E5,C5,F5,26,00 [726] 

980 DATA 6F,18,13,E5,C5,F5,AF,32,75,96,01 [1693] 

990 DATA F0,D8,CD,58,93,01,18,FC,CD,58,93 [2476] 

1000 DATA 01,9C,FF,CD,58,93,01,F6,FF,CD,58 [1405] 
1010 DATA 93,7D,CD,65,93,F1,C1,E1,C9,AF,09 [2312] 
1020 DATA 3C,38,FC,ED,42,3D,28,08,32,75,96 [1806] 
1030 DATA C6,30,C3,AB,94,3A,75,96,B7,CA,A9 [975] 
1040 DATA 94,AF,18,Fl,00,20,20,20,20,20,20 [1694] 
1050 DATA 20,20,20,20,20,20,00,00,00,00,3A [1472] 
1060 DATA 5A,BB,32,81,93,2A,5B,88,22,82,93 [2298] 
1070 DATA C9,3A,81,93,32,5A,BB,2A,82,93,22 [1570] 
1080 DATA 5B,BB,C9,32,a4,93,3A,84,93,CD,2B [1485] 
1090 DATA BD,D8,18,F4,B7,C2,04,91,06,F5,ED [2044] 
1100 DATA 78,17,17,DA,IC,91,CD,85,93,3E,C3 [2502] 
1110 DATA DD,21,9F,93,32,5A,BB,DD,22,5B,BB [1255] 
1120 DATA 18,2C,B7,C2,04,91,11,FF,96,CD,65 [2480] 
1130 DATA 90,CD,9E,97,CD,85,93,21,75,93,11 [1557] 
1140 DATA BB,9C,06,0C,CD,8C,BC,D2,92,BC,3E [1063] 
1150 DATA FF,32,74,93,18,OB,B7,C2,04,91,CD [1572] 
1160 DATA 85,93,AF,32,74,93,DD,21,00,20,CD [1820] 
1170 DATA A0,94,CD,1B,BB,38,59,DD,66,00,DD [2125] 
1180 DATA 6E,01,E5,11,10,27,ED,52,E1,D2,C6 [2226] 
1190 DATA 94,CD,31,93,11,04,00,DD,19,DD,7E [1664] 
1200 DATA 00,FE,20,C4,A9,94,DD,7E,00,DD,23 [970] 
1210 DATA FE,OD,28,CF,FE,OE,28,25,FE,20,38 [1546] 
1220 DATA EF,4F,3A,74,93,B7,79,28,0A,FE,F1 [1129] 
1230 DATA 28,E3,FE,EA,20,02,3E,27,FE,A5,30 [1486] 
1240 DATA 32,FE,7F,20,02,3E,A4,CD,AB,94,18 [1915] 
1250 DATA CE,11,05,00,DD,19,16,C7,01,10,10 [1393] 
1260 DATA CD,38,BC,CD,1B,BB,38,FB,CD,06,BB [2188] 
1270 DATA F5,01,00,00,CD,38,BC,Fl,FE,FC,20 [2905] 
1280 DATA 8D,CD,C6,94,C3,EE,90,CD,84,94,18 [1948] 
1290 DATA A2,21,D2,9A,D6,A5,28,09,47,3B,2B [2002] 
1300 DATA OE,FF,ED,B1,10,F8,7E,FE,2E,CA,A9 [2110] 
1310 DATA 94,CD,AB,94,23,18,F4,3E,0D,CD,AB [1409] 
1320 DATA 94,3E,0A,18,02,3E,20,CD,5A,BB,F5 [1873] 
1330 DATA 3A,74,93,B7,20,02,F1,C9,F1,E5,D5 [1571] 
1340 DATA C5,DD,ES,CD,95,BC,DD,El,CI,Dl,El [1794] 
1350 DATA C9,CD,92,93,3A,74,93,FE,FF,C0,ÄF [2058] 
136Q DATA 32,74,93,C3,8F,BC,FE,02,D2,04,91 [1409] 
1370 DATA DD,5E,00,DD,56,01,3D,28, OS, 11,00 [1089] 
1380 DATA 20,21,FE,8F,ED,52,DA,0A,91,EB,13 [929] 
1390 DATA E5,DD,Ei,AF,32,76,96,3E,FF,B7,37 [1351] 
1400 DATA DD,E5,D5,CD,3C,95,CD,46,96,CB,57 [1442] 
1410 DATA Dl,DD,El,CO,3A,77,96,87,CO,DD,ES [2419] 
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1420 DATA D5,CD,7C,90,11,81,96,DD,2B,DD,36 [2340] 
1430 DATA 00,00,CD,49,91,Dl,18,CD,B7,C2,04 [1891] 
1440 DATA 91,11,FF,FF,AF,32,76,96,B7,CD,3C [1396] 
1450 DATA 95,CD,46,96,CB,57,C0,18,ED,F3,0B [1010] 
1460 DATA F5,08,D9,C5,D5,E5,01,00,F5,21,F5 [1979] 
1470 DATA 7F,D9,01,10,F6,ED,49,08,01,10,7F [1749] 
1480 DATA ED,49,0E,4B,ED,49,D9,ED,78,D9,1F [1458] 
1490 DATA E6,40,F6,1C,4F,BF,C2,19,96,CD,20 [2194] 
1500 DATA 96,30,Fa,21,15,04,10,FE,2B,7C,B5 [1927] 
1510 DATA 20,F9,CD,1C,96,30,E9,06,9C,CD,1C [1622] 
1520 DATA 96,30,E2,3E,C6,B8,30,EO,24,20,F1 [985] 
1530 DATA 06,C9,CD,20,96,30,D3,78,FE,D4,30 [1345] 
1540 DATA F4,CD,20,96,30,77,79,EE,07,4F,26 [2071] 
1550 DATA 00,06,BO,18,ID,08,30,14,20,05,DD [1763] 
1560 DATA 75,00,10,00,CB,11,AD,70,32,77,96 [1709] 
1570 DATA BF,79,1F,4F,18,03,DD,23,13,08,06 [1249] 
1580 DATA B2,2E,01,CD,1C,96,30,4F,3E,CB,B8 [2305] 
1590 DATA CB,15,06,B0,D2,C5,95,7C,AD,67,7A [1172] 
1600 DATA a3,20,CB,ll,5A,9A,37,01,54,7F,ED [1908] 
1610 DATA 49,01,e2,F7,ED,49,D9,El,Dl,Cl,D9 [2770] 
1620 DATA 08,F1,08,38,OB,7C,FE,01,11,7D,9A [1810] 
1630 DATA 38,03,11,6B,9A,CD,46,96,CB,57,28 [1562] 
1640 DATA 03,11,48,9A,3A,76,96,B7,C0,CD,7C [2005] 
1650 DATA 90,C3,65,90,11,8E,9A,37,18,C6,B7 [1254] 
1660 DATA 18,C3,CD,20,96,DO,CD,46,96,CB,57 [1768] 
1670 DATA C0,3E,05,3D,20,FD,A7,04,C8,D9,ED [1144] 
1680 DATA 78,D9,1F,A9,E6,40,28,F4,79,BE,45 [2462] 
1690 DATA 4F,F6,40,D9,44,ED,79,45,D9,37,C9 [1900] 
1700 DATA P3,C5,01,0E,F4,ED,49,01,C0,F6,ED [2130] 
1710 DATA 78,ED,49,OE,00,ED,49,01,92,F7,ED [1843] 
1720 DATA 49,05,E6,30,4F,C5,F6,48,ED,79,06 [2010] 
1730 DATA F4,ED,78,01,82,F7,ED,49,CI,ED,49 [1724] 
1740 DATA 2F,C1,C9,00,00,00,OD,OA,46,6F,75 [1482] 
1750 DATA 6E,64,3A,A0,4C,6F,61,64,69,6E,67 [1628] 
1760 DATA AO,42,41,53,49,43,AO,44,41,54,41 [2354] 
1770 DATA 20,A0,43,4F,44,45,20,A0,CD,C4,96 [1252] 
1780 DATA CD,CB,97,CB,57,20,IC,21,75,93,06 [2229] 
1790 DATA 0C,11,BB,9C,CD,8C,BC,21,00,40,11 [1761] 
1800 DATA PF,3F,01,00,00,3E,02,CD,98,BC,CD [2191] 
1810 DATA 8F,BC,CD,Fl,97,21,00,40,11,00,CO [1438] 
1820 DATA 0l,FF,3F,ED,BO,C9,0A,05,19,0B,0B [1519] 
1830 DATA 06,18,OA,02,02,53,61,76,65,20,53 [1923] 
1840 DATA 43,52,45,45,4E,BA,02,04,5B,59,5D [2218] 
1850 DATA 65,73,20,2D,20,5B,4E,5D,EF,FF,05 [2271] 
1860 DATA O9,23,OD,O6,0A,22,0C,02,02,49,6E [1606] 
1070 DATA 70,75,74,20,66,69,6C,65,6E,61,6D [2282] 
1880 DATA 65,BA,FF,CD,9C,BB,37,F5,DD,66,00 [2226] 
1890 DATA DD,6E,01,DD,56,02,DD,5E,03,CD,66 [1476] 
1900 DATA BB,CD,6C,BB,F1,30,0D,CD,9C,BB,01 [978] 
1910 DATA 04,00,DD,09,37,3F,F5,18,DE,FD,7E [1606] 
1920 DATA 00,FE,FF,C8,67,FD,23,FD,6E,00,FD [2039] 
1930 DATA 23,CD,75,BB,PD,7E,00,FD,23,CB,7F [1659] 
1940 DATA CB,BF,CD,5A,BB,28,F2,18,DF,C5,CD [1894] 
1950 DATA 18,BB,P5,CD,46,96,CB,57,20,2E,F1 [1684] 
1960 DATA FE,0D,28,15,FE,30,38,EC,FE,7B,30 [1958] 
1970 DATA E8,77,CD,5A,BB,23,C1,10,DF,3E,00 [1788] 
1980 DATA ED,47,C9,78,D6,Oa,30,D6,3E,20,77 [1516] 
1990 DATA CD,5A,BB,23,10,F7,C1,3E,FF,ED,47 [2861] 
2000 DATA C9,E1,E1,E1,E1,F5,11,48,9A,CD,65 [1968] 
2010 DATA 90,Fl,C9,CD,81,BB,06,08,21,75,93 [2140] 
2020 DATA CD,57,97,3E,2E,77,CD,5A,BB,ED,57 [989] 
2030 DATA FE,FF,28,08,23,06,03,CD,57,97,18' [1618] 
2040 DATA OB,2A,7E,93,36,20,23,36,20,23,36 [1788] 
2050 DATA 20,C3,84,BB,FD,21,D8,96,DD,21,DO [2970] 
2060 DATA 96,CD,OF,97,CD,18,BB,CB,AF,FE,4E [2516] 
2070 DATA 28,1D,FE,59,20,F3,FD,21,FD,96,DD [1654] 
2080 DATA 21,F5,96,CD,OF,97,CD,9E,97,26,00 [2196] 
2090 DATA 2E,00,16,50,lE, 19,C3,66,B’B,CD,Fl [1840] 
2100 DATA 97,CD,C4,96,C1,C9,01,08,01,5A,58 [1687] 
2110 DATA 20,53,70,65,63,74,72,75,60,20,54 [1926] 
2120 DATA 72,61,6E,73,66,65,72,20,20,20,33 [1752] 
2130 DATA 2E,Bl,FO,03,07,03,77,72,69,74,74 [1669] 
2140 DATA 65,6E,20,62,79,20,55,4E,49,73,6F [2578] 
2150 DATA 66,74,2C,20,20,40,43,40,58,43,49 [1979] 
2160 DATA C9,FO,01,01,06,7C,43,41,D4,7C,4C [1121] 
2170 DATA 4F,41,44,5B,2C,3C,61,64,72,3E,DD [1994] 
2180 DATA 7C,S6,45,52,49,46,D9,7C,4C,49,53 [2419] 
2190 DATA D4,7C,4C,4C,49,53,D4,7C,53,41,56 [2598] 
2200 DATA C5,7C,44,55,4D,50,5B,2C,3C,61,64 [1835] 
2210 DATA 72,3E,DD,7C,53,43,52,45,45,4E,2C [1192] 
2220 DATA 3C,70,61,72,BE,7C,53,41,56,45,2E [1732] 
2230 DATA 53,43,D2,7C,4D,41,53,4B,2C,3C,70 [1013] 
2240 DATA 61,72,31,3E,2E,2E,2E,3C,70,61,72 [2329] 
2250 DATA 38,BE,7C,48,45,4C,DO,FO,01,17,06 [1784] 
2260 DATA 2D,20,63,61,74,61,6C,6F,67,20,5A [2293] 
2270 DATA 58,20,66,69,6C,65,F3,2D,20,6C,6F [1970] 
2280 DATA 61,64,69,6E,67,20,5A,58,20,66,69 [1898] 
2290 DATA 6C,E5,2D,20,76,65,72,69,66,79,20 [2301] 


2300 DATA 5A,58,20,66,69,6C,E5,2D,20,6C,69 [2174] 
2310 DATA 73,74,20,5A,58,20,42,41,53,49,C3 [1644] 
2320 DATA 2D,20,70,72,69,6E,74,20,5A,58,20 [1227] 
2330 DATA 42,41,53,49,C3,2D,20,73,61,76,65 [2427] 
2340 DATA 20,5A,58,20,42,41,53,49,C3,2D,20 [1998] 
2350 DATA 6D,65,6D,6F,72,79,20,64,75,6D,F0 [2210] 
2360 DATA 2D,20,73,68,6F,77,20,5A,58,20,73 [1657] 
2370 DATA 63,72,65,65,EE,2D,20,73,61,76,65 [1649] 
2380 DATA 20,73,63,72,65,65,EE,2D,20,73,65 [1907] 
2390 DATA 74,20,6D,61,73,6B,20,63,6F,6C,6F [1728] 
2400 DATA 75,F2,2D,20,73,68,6F,77,20,63,6F [3314] 
2410 DATA 6D,6D,61,6E,64,F3,F0,02,0A,14,3C [1863] 
2420 DATA 3C,20,20,50,62,45,53,53,20,41,4E [2111] 
2430 DATA 59,20,4B,45,59,20,20,3E,BE,FO,03 [1876] 
2440 DATA 01,19,63,6F,70,79,72,69,67,68,74 [1921] 
2450 DATA 20,43,50,43,20,41,6D,73,74,72,61 [2216] 
2460 DATA 64,20,49,6E,74,65,72,6E,61,74,69 [1154] 
2470 DATA 6F,6E,61,6C,20,31,39,39,B2,FO,FF [2570] 
2480 DATA CD,93,BB,67,CD,11,BC,6F,E5,3E,01 [1847] 
2490 DATA CD,OE,BC,DD,21,04,9a,CD,C6,99,CD [1722] 
2500 DATA 18,BB,El,7C,ED,47,7D,CD,0E,BC,ED [1618] 
2510 DATA 57,CD,90,BB,C9,DD,2B,DD,23,DD,7E [2087] 
2520 DATA 00,FE,FF,C8,CD,90,BB,DD,23,DD,66 [1517] 
2530 DATA 00,DD,6E,01,DD,23,DD,23,E5,CD,75 [1277] 
2540 DATA BB,DD,7E,00,CB,7F,F5,CB,BF,CD,5A [2583] 
2560 DATA BB,DD,23,Fl,20,02,18,EE,El,DD,7E [2197] 
2560 DATA 00,FE,PO,28,CB,2C,18,DF,2A,2A,20 [2300] 
2570 DATA 50,61,72,61,60,65,74,65,72,20,74 [1489] 
2580 DATA 6F,6F,20,6D,61,6E,79,20,2A,2A,87 [2558] 
2590 DATA 2A,2A,20,43,6F,64,65,20,69,6E,20 [2125] 
2600 DATA 70,72,6F,67,72,61,6D,20,2A,2A,87 [1744] 
2610 DATA 2A,2A,20,50,61,72,61,60,65,74,65 [1743] 
2620 DATA 72,20,65,78,70,65,63,74,65,64,20 [1414] 
2630 DATA 2A,2A,87,2E,2E,2E,45,73,63,61,70 [2218] 
2640 DATA 65,20,70,72,65,73,73,65,64,80,2E [1342] 
2650 DATA 2E,2E,46,69,6C,65,20,74,6F,6F,20 [1842] 
2660 DATA 6C,6F,6E,67,80,2E,2E,2E,43,68,65 [1991] 
2670 DATA 63,6B,73,75,6D,20,65,72,72,6F,72 [1721] 
2680 DATA 80,2E,2E,2E,43,68,65,63,6B,73,75 [2194] 
2690 DATA 6D,20,4F,2E,4B,2E,80,2E,2E,2E,53 [2089] 
2700 DATA 74,61,72,74,62,69,74,20,60,69,73 [1438] 
2710 DATA 73,69,6E,67,80,2A,2A,20,49,6E,76 [1937] 
2720 DATA 61,6C,69,64,20,70,61,72,61,6D,65 [1620] 
2730 DATA 74,65,72,20,2A,2A,87,2A,2A,20,50 [1990] 
2740 DATA 72,69,6E,74,65,72,20,6E,6F,74,20 [1597] 
2750 DATA 72,65,61,64,79,20,2A,2A,87,52,4E [1297] 
2760 DATA 44,2E,49,4E,43,45,59,24,2E,50,49 [1350] 
2770 DATA 2E,46,4E,2E,50,4F,49,4E,54,2E,53 [754] 
2780 DATA 43,52,45,45,4E,24,2E,41,54,54,52 [2262] 
2790 DATA 2E,41,54,2E,54,41,42,2E,56,41,4C [1983] 
2800 DATA 24,2E,43,4F,44,45,2E,56,41,4C,2E [1666] 
2810 DATA 4C,45,4E,2E,53,49,4E,2E,43,4F,53 [1897] 
2820 DATA 2E,54,41,4E,2E,41,53,4E,2E,41,43 [1276] 
2830 DATA 53,2E,41,54,4E,2E,4C,4E,2E,45,58 [1312] 
2840 DATA 50,2E,49,4E,54,2E,53,51,52,2E,53 [1685] 
2850 DATA 47,4E,2E,41,42,53,2E,50,45,45,4B [1615] 
2860 DATA 2E,49,4E,2E,55,53,52,2E,53,54,52 [1765] 
2870 DATA 24,2E,43,48,52,24,2E,4E,4F,54,2E [1534] 
2880 DATA 26,78,2E,20,4F,52,2E,20,41,4E,44 [2047] 
2890 DATA 2E,3C,3D,?E,3E,3D,2E,3C,3E,2E,4C [1632] 
2900 DATA 49,4E,45,20,2E,54,48,45,4E,20,2E [1367] 
2910 DATA 54,4F,2E,53,54,45,50,2E,44,45,46 [2054] 
2920 DATA 20,4$,4E,2E,43,41,54,2E,46,4F,52 [1838] 
2930 DATA 4D,41,54,2E,4D,4F,56,45,2E,45,52 [2099] 
2940 DATA 41,53,45,2E,4F,50,45,4E,23,2E,43 [1827] 
2950 DATA 4C,4F,53,45,23,2E,4D,45,52,47,45 [1529] 
2960 DATA 2E,56,45,52,49,46,59,2E,42,45,45 [2044] 
2970 DATA 50,2E,43,49,52,43,4C,45,2E,49,4E [1208] 
2980 DATA 4B,2E,50,41,50,45,52,2E,46,4C,41 [2056] 
2990 DATA 53,48,2E,42,52,49,47,48,54,2E,49 ^765] 
3000 DATA 4E,56,45,52,53,45,2E,4F,56,45,52 [1754] 
3010 DATA 2E,4F,55,54,2E,50,52,49,4E,54,23 [2041] 
3020 DATA 38,2C,2E,4C,49,53,54,23,38,2E,53 [1843] 
3030 DATA 54,4F,50,2E,52,45,41,44,2E,44,41 [1631] 
3040 DATA 54,41,2E,52,45,53,54,4F,52,45,2E [2099] 
3050 DATA 4E,46,57,2E,42,4F,52,44,45,52,2E [1612] 
3060 DATA 43,4F,4E,54,2E,44,49,4D,2E,52,45 [2183] 
3070 DATA 4D,2E,46,4F,52,2E,47,4F,54,4F,2E [1826] 
3080 DATA 47,4F,53,55,42,2E,49,4E,50,55,54 [1360] 
3090 DATA 2E,4C,4F,41,44,2E,4C,49,53,54,2E [1301] 
3100 DATA 4C,45,54,2E,50,41,55,53,45,2E,4E [2091] 
3110 DATA 45,50,54,2E,5O,4F,4B,4S,2E,5O,52 [1635] 
3120 DATA 49,4E,54,2E,50,4C,4F,54,2E,52,55 [1290] 
3130 DATA 4E,2E,53,41,56,45,2E,52,41,4E,44 [1577] 
3140 DATA 4F,4D,49,5A,45,2E,49,46,2E,43,4C [1915] 
3150 DATA S3,2E,44,52,41,57,52,2E,43,4C,45 [1400] 
3160 DATA 41,52,2E,52,45,54,55,52,4E,2E,43 [1796] 
3170 DATA 4F,50,59,2E,00,00,00,00,00,00,00 [1770] 
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Aus Text mach COM 


ASC2COM bringt Texte zum Laufen 

Die Public Domain für MS-DOS birgt so manches interessante Utility; unter 
anderem auch Programmezum“Compilieren'’von Textdateien, die danach 
direkt aufgerufen und aufdem Bildschirm dargestellt werden können. 
ASC2COM bildet eine Alternative für CPC-und JOYCE-User. 


Beim Slöbem in einigen PD-Sammlun- 
gen für CP/M stießen wir auf ein Pro¬ 
grammarchiv mit vielen Utilities von 
Eric Gans. Unter anderem fanden wir 
auch ein Programm zum Einbinden von 
Texten in Programme. Dies erwies sich je¬ 
doch als nicht ablauffähig, und der Quell¬ 
code war nicht verfügbar. Was also tun? 
Das Rad mußte neu erfunden werden. 

Von der Idee zum 
Programm 

Das Problem bei der Entwicklung eines 
solchen Ulilitys bestand eigentlich nur 
darin, der Textdatei einen Vorspann zu 
verpassen, der den gewünschten Pro¬ 
grammcode enthält, und dann das Ganze 
in Übereinstimmung zu bringen. Beim 
wiederholten Stöbern in der Bedie¬ 
nungsanleitung von Prolink kam dann 
die Idee: Dieser famose Linker aus der 
PD bindet nämlich alles, was man ihm 
vorsetzt, auch Texldateien. 

Es mußte also ein kleines Assembler¬ 
programm geschrieben werden, das so 
tut, als stünde ein langer, fiktiver Text 
am Programmende. Der Linker muß 


dann nur noch überredet werden, die 
Textdutei an die richtige Stelle einzu¬ 
binden. Dies alles läßt sich mit ein paar 
Kommandos erledigen. 

Prolink, der besondere 
Linker 

Prolink versteht gleich mehrere Kom¬ 
mandos zum “Montieren” von Pro¬ 
grammen. Zum einen das Kommando 
LINK,mitdem sich übliche Modulc im 
REL-Formal einbinden lassen. Zum 
anderen gibt es aber auch das Komman¬ 
do LOAD, und damit akzeptiert dieser 
Linker so ziemlich alle Dateien. Hat der 
angegebene Dateiname keine Extensi¬ 
on wie .HEX oder .S YM, dann wird die 
angegebene Datei sektorweise ohne 
jegliche Veränderung übernommen. 
Damit stehen die notwendigen Kom¬ 
mandos fest: 

PROLINK 
OUTFIL ausgabe 
LINKASC2COM 
LOAD textdat 
EXIT 


In der Submit-Datei ASC2COM.SUB 
finden wir diese Kommandos wieder. 
OUTFIL legt den Namen der zu erstel¬ 
lenden Coni-Datei fest. 

Zunächst wird der Assembler-Vor¬ 
spann ASC2COM eingebunden. Das 
Kommando LOAD plaziert nun die ge¬ 
wünschte Textdatei unmittelbar dahin¬ 
ter. und EXIT schreibt das Ergebnis auf 
die Diskette. 

Wird beispielsweise folgende CP/M- 
Kommandozeilc cingegeben 

SUBMIT ASC2COM README 
LIESMICH. TXT <ENTER> 

dann wird der ASCII-Datei LIES- 
MICH.TXT der Vorspann verpaßt und 
das Ganze als Datei README.COM 
auf die Diskette im aktuellen Laufwerk 
geschrieben. Geben Sie dann 
A>README ein, gefolgt von <Enter>, 
dann wird seitenweise der Inhalt der 
Datei LIESMICH.TXT auf dem Bild¬ 
schirm ausgegeben. 

In der rechten unteren Bildschirmecke 
erscheint dann die Eingabeaufforde¬ 
rung -h-O. Betätigen Sie die Taste <+>, 
dann wird die nächste Seite ausgege¬ 
ben. Die Taste <-> wiederum blättert ei¬ 
ne Seite zurück. Haben Sie die ganze 
Datei durchgeblättcrt, so drücken Sie 
einfach <0>, und Sie befinden sich wie¬ 
der in der Kommandoebene von CP/M. 

Notlösung für Joycer 

Falls Ihnen die hier aufgeführten Ein¬ 
gaben zu kompliziert sind oder wenn 
Sie nicht über Prolink verfügen, kön¬ 
nen Sie sich mit ASC2C0M.BAS be¬ 
helfen. Dieses Mallard-BASIC-Pro- 
gramm mischt den Text- und den Pro¬ 
grammteil automatisch zusammen. 
Wer Interesse an dieser Routine hat. 
kann sie der JOYCE-DATABOX zu 
diesem Heft entnehmen. 


;ASC2rOM.SUB;ASCII-iiiCOM-Dawi wandeln 
iFolgende Dateien müssen aul'deni Hc/ugslaufwerk 
tvorhanden .sein; ASaCOM.RELÄ PR0L1NK.COM 
•.Parameter LNainederCOM-Datei 
•.Parnnjeter2:Natncdcr ASCü-Datei 
tBcispicI; SUBMITA.SC2C0M README HILFE.TXT 
tcrslelltftusderASCIl-Diitci HILFE.TXT 
;dieCOM-DaieiREADME.COM 

PROUNK 

<OLTRL$l 

<LINKASC2C0M 

<L0ADS2 

<SYMBOL 

<STAT 

<EXIT 


ASClCOM.SVfi wandelt Ihre Textdateien 
automatisch in ahlaujfähige Programme 
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Da in dem Assembler-Programm nur 
CP/M-plus-lypischc BDOS-Aufrufe 
verwendet werden, ist eine Anpassung 
der abgedrucklcn JOYCE-Version an 
den CPC leicht machbar. 

Wenn Sie sich den Ouellcode einmal 
genauer anschauen, werden Sie fesl- 
stellen. dalkliese Änderung bereits vor¬ 
gesehen ist. Am Anfang der Datei fin¬ 
den Sie die Vereinbarung: 
pew equ true 


Wen n S ie diese Zei le i n 

pew equ not true 

abUndem und abschließend das Pro¬ 
gramm neu assemblicren, dann funk¬ 
tioniert ASC2COM auch auf dem CPC 
6128. 

Die Assemblierung kann mit folgender 
Befehlszeile gestartet werden: 


A>ZASM ASC2COM TEXT TRUNC=89 
DATE=TTMMJJ TIME=HHMMSS OPCODE 
SYMB 

WolfgangTräber/rs 


Wer Prolink und Zasm noch nicht in sei¬ 
ner Software-Sammlung beherbergt, 
kann sie auf der PD-Diskettc 18 bei der 
Firma Weeske. Backnang, beziehen. 


;ASC2COM 



;CP/M Plus fuer 

CPC und 

PCW/JOYCE 

;(c) 1992 Wolfgang Traeber und CPC International 


title 

ASCII-Datei zu COM-Datei umwandeln 


subttl 

ASC2COt' 

.ASM 


list 

nocond 



list 

text 


true 

equ 

-1 

; Ja-Wert 

pew 

equ 

true 

;bei CPC6128 auf NOT TRUE 

cpc6128 

equ 

not pew 


boot 

equ 

0 

;Warmstart 

bdos 

equ 

5 

;BDOS-Vektor 

printf 

equ 

9 

;BDOS-Funktion Print String 

conio 

equ 

6 

;BDOS-Funktion Dir Con I/O 

cinput 

equ 

Ofdh 

/•Console Input 

conout 

equ 

2 

;BDOS-Funktion Con Output 

tpa 

equ 

0100h 

;TPA-Adresse 

BELL 

equ 

7 

;Piepser 

LF 

equ 

OOah 

;Line Feed 

EOF 

equ 

oiah 

;Dateiende 

ESC 

equ 

Olbh 

;Escapezeichen 

backf 

equ 


;zurueckblaettern 

forwrdf 

equ 


;vorwaertsblaettern 

exitf 

equ 

'0' 

;Programm beenden 


if 

pew 


pmax 

equ 

30 

;maximale Anzahl Zeilen 


eise 



pmax 

equ 

24 

;maximale Anzahl Zeilen 


endif 




org 

tpa 


call 

clear 

;Bildschirm loeschen 

Id 

hl,text 

;HL <- Textbereich 

Id 

b,0 


;B <- Zeilenzaehler 

msgout: 



;CYCLE 

Id 

a, (hl) 

;A <- Zeichen 

inc 

hl 


;HL <- naechstes Zeichen 

cp 

EOF 


;WHEN Dateiende 

jr 

eq,progend 

?BREAK 

call 

chrout 

;Zeichen ausgeben 

cp 

LF 


;IF Line Feed 

call 

eq,newline 

;Zeilenende verarbeiten 

jr 

rnsgout 

7END CYCLB 

progend 



/•Programm beenden 

IP 

boot 


;Warmstart 

chrout: 



/Zeichen ausgeben 

push 

af 


;AF sichern 

push 

bc 


;BC sichern 

push 

hl 


;HL sichern 

Id 

c, conout 

;C <- Print Character 

Id 

e,a 


;E <- Zeichen 

call 

bdos 


/Zeichen ausgeben 

pop 

hl 


/HL zurueckholen 

pop 

bc 


/BC zurueckholen 

pop 

af 


/AF zurueckholen 

ret 




t 

newline: 


/Zeilenende verarbeiten 


b 


/B <- Zeilenzaehler erh. 

Id 

a,b 


/A <- Zeilenzaehler 

cp 

pmax 


/IP Bildschirm voll 

call 

eq,newpage 

/Blaettern 


ret 


newpage: 

/Blaettern 

Id 

de,contmsg ;DE <- Blaetterkommando 

call 

prstr /ausgeben 

npl: 


push 

bc ;BC sichern 

push 

hl /HL sichern 

Id 

c,conio ;C <- Direct Console I/O 

Id 

e,cinput ;E <- Console Input 

call 

bdos /Auf Taste warten 

pop 

hl /HL zurueckladen 

pop 

bc ;BC zurueckladen 

cp 

exitf ;IF Blattern beenden 

jp 

eq,boot /Programm beenden 

cp 

backf ;IF zurueckblaettern 

ir 

ne,np2 /THEN 

Id 

b,2*pmax+i /B <- Zeilen zurueck 

Id 

de,text /DE <- Textanfang 

npla: 

/CYCLE (B) 

dec 

hl /HL <- ein Zeichen zurueck 

Id 

a,l ;A <- LowByte Textpointer 

cp 

e /nicht ueber Textanfang 

jr 

ne,nplb /hinaus zurueckblaettern 

Id 

a, h 

cp 

d 

jr 

eq,np3 

nplb: 


Id 

a,(hl) ;A <- Zeichen 

cp 

LF /IF Zeilenende 

jr 

ne,npla /THEN 

djnz 

npla /Zaehler vermindern 

jr 

np3 /END CYCLE 

np 2 : 

/ELSE 

cp 

forwrdf /IF vorwaertsblaettern 

ir 

ne,npl 

np3: 

;ENDIF 

call 

clear /Bildschirmloeschen 

Id 

b,0 /Zeilenzaehler auf 0 setzen 

ret 


f 

clear: 

/Bildschirm loeschen 

Id 

de,clrscr /DE <- Loeschkommando 

call 

prstr /String ausgeben 

ret 


t 

prstr; 

/String ausgeben 

push 

bc /BC sichern 

push 

hl /HL sichern 

Id 

c,printf /C <- Print String 

call 

bdos /String ausgeben 

pop 

hl /HL zurueckladen 

pop 

bc /BC zurueckladen 

ret 


clrscr: 


db 

ESC,'E',ESC,'HS' 

contmsg: 


i£ 

pew 

db 

ESC,'Y',32+30,32+84 

eise 


db 

ESC,'Y',32+24,32+74 

endif 


db 

BELL,ESC,'p' 

db 

' +-0 ',ESC,'q$' 

} 

global 

text 

text; 

/Beginn Textbereich 

end 
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Ein Trick für alle Fälle 

Um gute Programme zu schreiben, benötigt man immer 
wieder kleine Routinen, die dann in daseigene Programm 
eingebaut werden können. Sei es nun, um das Programm 
optisch aufzupeppen oder aber um irgendwelche Berech¬ 
nungen durchzuführen-die lYickkiste liatfür jeden et¬ 
was dabei. 

Es gibt tausend gute Gründe, diese Rubrik etwas genauer 
durchzulesen. Einer dieser Gründe sind die ausgewählten 
Programme.die wirdiesen Monat vorstellen können. 

ScreenScroll 

CPC464(plus)!664/6I28(ptus) 

ScreenScroll ist ein beeindruckendes Programm, das gerade 
einmal 970 Byte Speicherplatz beansprucht. Es erlaubt Ih¬ 
nen, bestimmte Bildschirmausschnitte in vier Richtungen auf 
dem Bildschirm zu scrollen. Hierzu werden vier neue RSX- 
Befehle in das System eingebunden: 

lHSCROLL,Links.Rechls,Oben,Unten.Richtung, Anzahl, 
IVSCROLL,Links,Rechts,Oben,Unten,Richlung,Anzahl, 
IWRAPON, 

IWRAPOFF. 

Die Parameter “Links” und “Rechts” sind byteorientiert, 
können also Werte zwischen 0 und 79 annehmen. 

Die Parameter“Oben”und “Unten” wiederum sind zeilenori¬ 
entiert und können Werte im Bereich von 0 und 199 anneh¬ 
men. 

Die linke untere Ecke des Bildschirms hat die Koordinaten 
0,0, während die rechte obere Ecke im Koordinatensystem 
die Werte 79,199 einnimmt. 

Die beiden Befehle IHSCROLL und IVSCROLL unterschei¬ 
den sich eigentlich nur darin, daß IHSCROLL horizontal und 


IVSCROLL vertikal scrolll. Der Parameter “Richtung” gibt 
bei IHSCROLL an. ob der Bildschirm nach links (Richtung = 
0) oder aber nach rechts (Richtung = 1) gescrollt werden soll. 
Bei IVSCROLL können ebenfalls nur die Werte 0 und 1 ein¬ 
getragen werden.Obedeutel “nach oben” und l “nach unten”. 
Jetzt muß lediglich in der Variablen “Anzahl” die Schrittwei¬ 
te in Byte oder Zeilen angegeben werden, um die der Bild- 
schirmausschnill gescrollt werden soll. 

Nach der Initialisierung der RSX-Routinc wird vorein¬ 
gestellt, daß ein aus dem angegebenen Bereich gescrollter 
Ausschnitt auf der gegenüberliegenden Seite wieder einge¬ 
blendet wird. Sollte dies aus irgendwelchen Gründen nicht 
erwünscht sein, kann diese Funktion mit IWRAPOFF ausge¬ 
schaltet werden. IWRAPON stellt dann wieder den Original- 
zustand her. 

Jürgen Weiss/rs 


100 ' ScreenScroll [833] 

110 ' CPC 464(plUS)/664/612a(pluS) [1940] 

120 ' (c) 1992 Juergen Weiss O^^] 

130 ' & CPC International [2118] 

140 IF PEEK(&A200)=201 THEN 180 [1657] 

150 MEMORY &A1PF [450] 

160 LOAD"SCroll.bin",&A200 [1400] 

170 CALL &A200 [597] 

180 MODE 1 [506] 

190 FOR i=0 TO 100 [451] 

200 MOVE RND*640,RND*400:DRAW RND*640.RND* [4057] 

400,RND*2+l:NEXT 

210 LOCATE 1,25:PRINT SPACES(40>; [-2243] 

220 GOTO 380 [488] 

230 LOCATE 1,25 : PRINT"HORIZONTALES SCROLLE [3113] 
N" 

240 GOSUB 420 [913] 

250 IHSCROLL,20,60,175,25,0,15 [2407] 

260 FOR t=l TO 200:NBXT [1050] 

270 [HSCROLL,20,60,175,25,1,30 [2237] 

280 FOR t=l TO 200:NEXT [1050] 

290 IHSCROLL,20,60,175,25,0,15 [2407] 

300 LOCATE 1,25:PRINT" VERTIKALES [1938] 

SCROLLEN 

310 GOSUB 500 [913] 

320 IVSCROLL,20,60,175,25,0,50 [1681] 

330 FOR t®l TO 200:NEXT [1050] 

340 IVSCROLL,20,60,175,25,1,100 [1586] 

350 FOR t=l TO 200:NEXT [1050] 

360 IVSCROLL,20,6 0,175,25,0,50 [1681] 

370 RETURN [555] 

380 |WRAPON:wr=l:GOSUB 230 [2219] 

390 LOCATE 1 , 25 : PRINT''NUN DAS GLEICHE NACH [2582] 
IWRAPOFF”:GOSUB 420 

400 jWRAPOFF:wr=0:GOSÜB 230 [1813] 

410 FOR t=l TO 5000:NEXT:RUN [1350] 

420 IWRAPON:FOR i=l TO 240 [1968] 

430 IHSCROLL,0,79,7,0,0,1 [1617] 

440 NEXT [350] 

450 IWRAPOFF [882] 

460 SOUND 1,200,10:WHILE SQ(1)=132:WEND [2931] 

470 IHSCROLL,0,79,7,0,1,80 [1693] 

480 IF wr=l THEN [WRAPON ELSE |WRAPOFF [1872] 

490 RETURN [555] 

500 |WRAPON:FOR i=l TO 32 [1904] 

510 VSCROLL,0,79,7,0,0,l:CALL &BD19 [2173] 

520 NEXT:GOTO 450 [981] 


100 ' ScreenScroll [833] 

110 ' Datalader (erzeugt Scroll.Bin) [3041] 

120 ' CPC 464(pius)/664/6128(plus) [1940] 

130 ' (c) 1992 Juergen Weiss [149] 

140 ' & CPC International [2118] 

150 DATA 01,OF,A2,21,39,A2,CD,D1,BC,3S,C9, [3248] 
32,00,A2,C9,1D, 1737 


160 DATA A2,C3,3D,A2,C3,A6,A2,C3,32,A3,C3, [2621] 
3C,Ä3>48,53,43, 2151 

170 DATA 52,4F,4C,CC,56,53,43,52,4F,4C,CC, [2552] 
57,52,41,50,4F, 1511 
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180 DATA CE,57,52,41,50,4F,46,06,00,00,00, [3279] 
00,00,FE,06,CO, 1319 

190 DATA DD,46,00,DD,7E,08,DD,4E,OA,91,32, [2692] 
96,A2,DD,7E,06, 1815 

200 DATA DD,4E,04,91,3C,32,FF,A5,DD,7E,02, [1724] 
B7,20,12,DD,7E, 1907 

210 DATA 0A,32,S5,A3,3E,23,32,93,A2,3E,B0, [2989] 
32,99,A2,18,10, 1407 

220 DATA 3E,2B,32,93,A2,3E,B8,32,99,A2,DD, [3032] 
7E,08,32,55,A3, 1728 

230 DATA CD,19,BD,F3,C5,3A,FF,A5,47,DD,7E, [1947] 
06,C5,F5,CD,47, 2479 

240 DATA A3,E5,Dl,00,lA,01,00,00,ED,00,00, [1966] 
12,Fl,CI,3D,10, 1394 

250 DATA EB,C1,10,E0,FB,C9,FE,06,C0,DD,46, [3761] 
00,DD,7E,0A,32, 2270 

260 DATA 55,A3,DD,7E,08,DD,4E,0A,91,3C,32, [3490] 

FE, A2,32,18,A3, 1820 

270 DATA 32,29,A3,DD,7S,06,DD,4E,04,91,32, [2631] 

FF, A5,DD,7B,02, 1874 

280 DATA B7,20,OF,3E,06,32,F6,A2,32,08,A3, [1264] 
3E,3D,32,10,A3, 1329 

290 DATA 18,OD,3E,04,32,F6,A2,32,08,A3,3E, [1971] 
3C,32,10,A3,CD, 1338 

300 DATA 19,BD,F3,C5,DD,7E,00,CD,47,A3,11, [1858] 
60,A3,01,00,00, 1717 

310 DATA ED,B0,3A,FF,A5,47,DD,7E,00,C5,F5, [2702] 

CD, 47,A3,F1,E5, 2660 

320 DATA 00,F5,CD,47,A3,Fl,Dl,öl,00,00,ED, [3870] 

BO, CI,10,EA,CD, 2196 

330 DATA 47,A3,EB,21,60,A3,2E,60,01,00,00, [4217] 
ED,BO,CI,10,C3, 1721 

340 DATA FB,C9,AF,32,9A,A2,3E,60,32,27,A3, [3683] 
C9,3E,AF,32,9A, 2045 

350 DATA A2,3E,B0,32,27,A3,C9,32,4E,A3,32, [3088] 
51,A3,2A,00,A5, 1645 

360 DATA 3A,00,A4,67,lE,00,16,00,19,09,00, [2813] 
00,00,00,00,00, 603 


370 MODE 1 [506] 

380 MEMORY &A1FF [450] 

390 Zeile = 150 ; schritt = 10 [695] 

400 adr = &A200 ; last = &A35F [1302] 

410 FOR i=l TO 16 [317] 

420 READ byteS [603] 

430 POKE adr,VAL{''S"+byte$) [745] 

440 sum = suiti + PEEK{adr) [1499] 

450 adr = adr + l [392] 

460 NEXT [350] 

470 READ checksuro [1451] 

480 IF sum <> checksum THEN PRINT "Fehler [3386] 
in Zeile'’;zeile 

490 IF adr < last THEN sum = 0 : zeile = z [2226] 
eile + schritt : GOTO 410 

500 FOR i=0 TO 199 [659] 

510 hl=StCOOO+((199-i)MOD a)*&800+((199'i [2221] 

540 POKE &A500+i,l [414] 

550 POKE &A400+i,h [1022] 

560 NEXT [350] 

570 SAVE "scroll.bin",b,&A200,&3C8 [1573] 


Kurz getestet 

CPC464!664l6l28(pIus) 

Programmieren Sie Ihren CPC selbst? Natürlich, aber ist es 
Ihnen auch schon passierl, daß irgendwo überprüft werden 
soll, ob die Datendateien auch vorhanden sind, bevor auf sie 
zugegriffen wird? Das Mallard-Basic des CPC bietet hierzu 
den Befehl FIND$ an. Der CPC-Beniilzer muß sich selbst 
weiterhelfen. 


• Belegen Sie eine Variable aS mildem Dateinamen: 

10 a$="TEST.BAS" 

• Nun wird die Variable “a%” mit dem Wert 0 gefüllt: 

20 a%=0 

• Der Aufruf der Routine erfolgt mit: 

30 CALL &A000,(aa$,@a% 

• In “a%” stehen nun die Werte 0 oder 1. Der entsprechende 
Wert wird ausgelesen undausgewertet: 


40 IF a%“l TEIEN PRINT "Datei nicht vorhanden" 

50 IF a%=0 THEN PRINT "Datei vorhanden" 

Jürgen Weiss/rs 


100 

' FileTest 

[875] 

110 

' CPC 464/664/6128(plus) 

[1582] 

120 

' (c) 1992 Juergen Weiss 

[149] 

130 

' s CPC International 

[2118] 

140 

MEMORY &9FFF 

[134] 

150 

FOR adr=&A000 TO &A02E:READ aS:P0KE ad 

[4115] 

r,VAL("&"+aS):NEXT 


160 

CLS 

[91] 

170 

PRINT"FileTest installiert" 

[3550] 

180 

PRINT"Aufruf mit: CALL &AOOO,@aS,§a%" 

[3248] 

190 

DATA 3E,C9,32,5A,BB,DD,5E,00 

[2142] 

200 

DATA DD,56,01,D5,DD,6E,02,DD 

[1119] 

210 

DATA 66,03,46,23,7E,5F,23,7E 

[879] 

220 

DATA 57,EB,11,00,CO,CD,77,BC 

[1581] 

230 

DATA Dl,38,03,3E,01,12,CD,7A 

[1320] 

240 

DATA BC,3E,CP,32,5A,BB,C9 

[1617] 

100 

'?Piletester 

[227] 

110 

',*CPC 464/664/6128(plus) 

[1115] 

120 

';(c) 1992 Juergen Weiss 

[1766] 

130 

'; & CPC International 

[1538] 

140 

'?CALL &A000,@nanieS,@ergebnis% 

[1381] 

150 

';ergebnis%=0, alles OK. 

[1642] 

160 

';ergebnis%=l, File nicht vorhanden 

[2627] 

170 

'org SaOOO 

[440] 

130 

'Id a,&c9 ;TXT0ÜT 

[1085] 

190 

'Id (Sibb5a),a ;ausschalten 

[1523] 

200 

'Id e,(ix) ;Parameter 

[1599] 

210 

'Id d,(ix+i) ;holen 

[1977] 

220 

'push de 

[428] 

230 

'Id l,(ix+2) 

[1420] 

240 

'Id h,(ix+3) 

[891] 

250 

'Id b,(hl) 

[1252] 

260 

'inc hl 

[195] 

270 

'Id a,(hl) 

{584] 

280 

'Id e,a 

[607] 

290 

'inc hl 

[195] 

300 

'Id a,(hl) 

[584] 

310 

'Id d,a 

[611] 

320 

'ex de,hl 

[465] 

330 

'Id de,&c000 »'Puffer einrichten 

[2941] 

340 

'call &bc77 /versuchen Datei 

[1072] 

350 

'pop de ;zu oeffnen 

[890] 

360 

'Tr c,close /Datei nicht 

[1795] 

370 

'Id a,l /vorhanden 

[2044] 

380 

'Id (de),a ;Variable=l setzen 

[2412] 

390 

'dose /Datei auf jeden 

[2149] 

400 

'call &bc7a /fall wieder 

[2884] 

410 

'Id a,&cf /schlie-en 

[1267] 

420 

'Id (&bb5a),a /TXTOüT ein 

[1593] 

430 

'ret /fertig 

[867] 


Damit Sie nun auch testen können, ob eine Datei vorhanden 
ist oder nicht, bieten wir folgende Routine an. In nicht einmal 
46 Byte ist diese Routine untergebracht. 

Nachdem die Daten eingelesen wurden, sollten Sie wie folgt 
Vorgehen. 


OCP-ArtStudio von Laufwerk B; 

CPC464I664l6}28(ph{s) 

Wiedereinmal kann man über das leidige Thema 3-Zol!-Dis- 
kellen-Preise hinwegblicken. Viele der CPC-User haben in- 


6/7’92 CPC 23 











Tips & Tricks 


zwischen sowieso ein Zwcitlaufwcrk mit 5,25-Zoil- oder so¬ 
gar 3,5-Zoll-Formai, so daß Daten und manche Programme 
auf die billigeren Disketten übertragen werden können. Je¬ 
doch klappt dies nicht mit allen Programmen. Bisher mußte 
sich die Sicherheitskopie von OCP-ArlStudio immer im 
Laufwerk A: befinden. Dies hat jetzt ein Ende. Siemüssen nur 
eine Kopie von OCP auf Ihr Zweitlaufwerk bringen und die¬ 
sen kleinen Lader abtippen. Ab sofort kannmit 
RUN"OCP-B" 

auch von Laufwerk B: geladen werden. Wieder eine 3-Zoll- 
Diskette gespart! 

Wolfgang Stengel/rs 


100 ' OCP-Artstudio Lader 

110 ' fuer Laufwerk a 

120 ' CPC 464/664/6128(plus) 

130 ' (c) 1992 Wolfgang Stengel 

140 ' & CPC International 

150 DATA CD,CE,BC,21,17,07,CD,D4,BC,22,14, 

07,79,32,16,07,DF,14,07,C9,00,00,00,C2 

160 OPEMOUT"h’':MEMORY &6FF;FOR x=&700 TO & 

717:READ aS:POKE x,VAL("&"+aS):NEXT 

170 LOAD"studio.bin’',&800:POKE St983,StCD:PO 

KE &984,&0;POKB &985,&7 

180 CALL &e00 


[783] 

[729] 

[1582] 

[793] 

[2118] 

[3056] 

[3003] 

[3806] 

[506] 


Raindown 

CPC464(p{us)l6(y4/6I2S(})!us) 
Regnen soll ein Bild herab, 
in den CPC. 

Was es darslcllt, wartet’s ab. 
Schaut mal her, j uchhe 1 


Mit Reimen hat diese Routine nicht sonderlich viel zu tun, 
dafür jedoch mit Regen. Haben Sie auf der CeBIT Präsenta¬ 
tionen von Computern sehen können, so sollten Sie schon 
wissen, um was cs geht. Die Rede ist von einem Bild, welches 
lang.sam von unten nach oben in den Bildschinn hineinreg¬ 
net, und dies so. daß jeder Regentropfen geiiauesiens beob¬ 
achtet werden kann. 

Um nun eigene Demon.strationcn erstellen zu können, sollten 
Sie folgende Informationen mit auf den Wegnehmen. 


• Bevor das Bild eingeblendet werden kann, muß der Bild¬ 
schirm aufgebaut werden. Damit dies möglichst unautlüllig 
geschieht, sollten Sie alle INKs auf 0 setzen. 

• Jetzt wird der Bildschirmausschnilt festgelegt. der später 
eingcblendet werden soll. 

&a0()B enthält hierbei die oberste Rasterzei le im Bereich von 


Obis 199, 

&a() 14 enthält die Länge des einzublendendcn Bereichs (0 bis 


200 ). 

• Damit das Einregnen so schnell wie möglich vonstallen ge¬ 
hen kann, legt Raindown eine labellc an. Die Slartadresse 
liegt im Nonnalfall bei &A100. kann jedoch verändert wer¬ 
den. 

&A002/3 StartadrcssederTabclle-l 

&A049/4A Starladresse der Tabelle 

# Jetzt wird der angegebene Bildschirmbereich tniltels 
CALL &A066 an die Adresse &400() verschoben. Per CALL 
& AOOO wird nundas Bild wiedereingeblendcl. 


Andreas Groschke/rs 


100 ' Raindown [603] 

110 ' CPC 464(plus)/664/6128(plUS) [1940] 

120 ' (c) 1992 Andreas Grosche [1057] 

130 ' & CPC International [2118] 

140 MODE 0:CALL &BC02:INK l,l:GOSUB 170:GO [14758] 
SUB 160:GOSUB 160:GOSUB 160:CALL e:CLS:INK 
1,24:INK 3,14:POKE g,56:FOR c=0 TO 2:READ 
t:POKE f,t:CALL d:NEXT:LOCATE 7,25:PEN 14 
:PRI»T"D E M 0":FOR t=0 TO 2500:NEXT:MODE 
1:F0R t»0 TO 250:DRAWR RND*140-70,RND*80,1 
+ 2 * 

150 MOVE RND*640,RND*400:NEXT:GOSUB 160;PR [16605] 
INT”! wish it would rain down”;:PEN 2;PRIN 
T"... down on my CPC !":PEN 2:LOCATE 7,22: 

FOR t=0 TO 2000:NEXT:PRINT''Here comes the 
rain again I'’:CALL e:POKE f,199:POKE g,200 
:CALL d:FOR t=0 TO 3000;NEXT:MODE 2:GOSUB 
160 

160 PEN 1 :PRINT"RAIND0WN Vl . 0 '':PRI [6811] 

NT''written by A.Grosche " :PRINT"TEN-SOFT 
09.11.1991 ";PRINT SPACES{21):RETURN 
170 MEMORY &3FFF:d=&A000:e=&A066:f=&A00B:g [8474] 
=&A014:READ a$:IF PEEK(d)<>&DD THEN p=l:F0 
R a*d TO &A070:POKE a,VAL("&"+MID$(aS,p,2) 

):p=p+2:NEXT 
180 RETURN 

190 DATA DD21FFAODD360000DD2321C700110000C [12945] 

D1DBC06C8DD7500DD7401DD23DD23CD26BC10F1DD3 

60100DD2BDD2BDD6EOODD6601CBBC1811DD360100D 

D2BDD2BDD7E01BFFE0020E6C9FD2100A1FD5EOOFD5 

60101500OE5EDB0E1FD23FD23FD7E01BFFE0020E71 

8D02100C0110040424BEDBOC9,71,199,135 


100 

'; Raindown 


[487] 

110 

CPC 464(plue)/664/6128(plUB) 

[2511] 

120 

(ci 1992 Andreas 

Grosche 

[2109] 

130 

'; & CPC International 

[1538] 

140 

/ 


[117] 

150 

'org SaOOO 


[440] 

160 

/ 


[117] 

170 

'Id ix,&a0ff 

;TAB-START - 1 

[2071] 

180 

'Id (ix+0),0 


[355] 

190 

'inc ix 


[181] 

200 

'Id hl,199 


[1070] 

210 

'Id de,0 


[1028] 

220 

'call Sibcld 

;SCR DOT POS 

[1494] 

230 

'Id b,200 


[811] 

240 

'tbgen Id (ix+ 0 ),l 


[894] 

250 

'Id (ix+l),h 


[336] 

260 

'inc ix 


[181] 

270 

'inc ix 


[181] 

280 

'call Sbc26 

;SCR NEXT LINE 

[1540] 

290 

'djnz tbgen 


[1519] 

300 

'Id (ix+l),0 


[552] 

310 

'dec ix 


[477] 

320 

'dec ix 


[477] 

330 

/ 


[117] 

340 

'oloop Id l,(ix+ 0 ) 


[633] 

350 

'Id h,(ix+1) 


[720] 

360 

'res 7,h 


[753] 

370 

'jr oneln 


[794] 

380 

'olpbk Id (ix+l),0 


[924] 

390 

'dec ix 


[477] 

400 

'dec ix 


[477] 

410 

'Id a,(ix+ 1 ) 


[1061] 

420 

'cp a 


[349] 

430 

'cp 0 


[558] 

440 

'jr nz,oloop 


[612] 

450 

'ret 


[476] 

460 



[117] 

470 

'oneln Id iy,SiaiO0 

;TAB-START 

[1362] 

480 

'iloop Id e,(iy+0) 


[473] 

490 

'Id d,(iy+ 1 ) 


[982] 

500 

'Id bc,&50 


[1159] 

510 

'push hl 


[457] 

520 

'Idir 


[840] 

530 

'pop hl 


[554] 

540 

'xnc iy 


[184] 

550 

'inc iy 


[184] 

560 

'Id a,(iy+1) 


[878] 

570 

'cp a 


[349] 

580 

'cp 0 


[558] 

590 

'jr nz,iloop 


[905] 

600 

' j r olpbk 


[841] 

610 



[117] 

620 

'shift Id hl,&cooo 

;SHIFT 

(1459) 

630 

'Id de,S4000 


[1270] 

640 

'Id b,d 


[612] 

650 

'Id c,e 


[659] 

660 

'Idir 


[840] 

670 

'ret 


[476] 

680 

r 


[117] 
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100 DM für 
1 kByte 

Sie wünschen bitte? 


Vielleicht hat essich schon herumgesprochen? Die CPC 
International bietet mit Jeder Ausgabe mehrere Spitzen¬ 
programme, die nur ein schlappes kByte Speicherplatz 
benötigen. Auch diesen Monat soll dies so sein. Schauen 
Sie, was wir wieder an interessanten Leckerbissen zusam¬ 
mengetragen haben. 


Rekanoid 

CPC664/6I28(plus) 

Arkanoid ist ein echter Renner unter den Computcrspielen. 
Kaum eine andere Spielidee wurde so oft kopiert und hatte so 
viel Erfolg. Kein Wunder also, daß sich einer unserer Leser an 
seinen Computer setzte und eine 1 -kByte-Variante program¬ 
miert hat. 

Bei diesem Spiel geht es nun darum, einen kleinen Ball mit ei¬ 
nem Schläger innerhalb eines vorgegebenen Spielfeldes zu 
halten. In diesem Feld, daß nach oben, links und rechts durch 
Mauern begrenzt ist, befinden sich Quadrate, die es mit dem 
Ball zu treffen gilt. Wird ein Quadrat von dem Ball berührt, 
verschwindet dieses, und der Ball wird in die entgegengesetz¬ 
te Richtung geschleudert. Ganz nebenbei erhält man dann 
noch einen Punkt. 

Um nun alle Quadrate zerstören zu können, muß der Schläger 
am unteren Bildscliirmrand bewegt werden. Unten befindet 
sich nämlich keine Mauer, undsomußder Ball, wenn er nach 
unten fällt, mit dem Schläger aufgefangen und wieder in das 
Spielfeld geschleudert werden. 

Verläßt der Ball das Spielfeld, wird dem Spieler von den ur¬ 
sprünglich drei Schlägern einer abgezogen. Im Anschluß 
hieran wird das Spiel in der aktuellen Phase fortgesetzt. Sind 
alle Schläger verbraucht, endet das Spiel. Ebenso endet das 
Spiel, wenn alle Quadrate zerstört wurden. 

Sebastian Bobach/rs 



Wir präsentieren: die erste /•kUyie-Untsetzung von Arkanoid 


Ein Drink für alle Fälle 

CPC464(plm)!66416!2H(plus) 

Daß ein kByte in vielen Fällen ausreicht, um mehr oder weni¬ 
ger anspruchsvolle Spiel- oder Anwendungsprogramme zu 
erstellen, beweisen wir mit dieser Rubrik schon seit vielen 
Monaten. Daß sich aber auch mit einem “Miniprograrnm” 
sehr interessante Grafiken erstel len lassen, können wir dieses 
Mal aufzeigen. Gezeichnet wird von einem gerade einmal 
fünf Zeilen langen Programm ein Trinkgefäß, wie man es — 
gerade zu dieser Jahreszeit-des öfteren zu Gesicht bekommt. 
Ganz stilecht mit Zitrone und Strohhalm macht dieses Bild 
bestimmt so manchem Appetit auf einen kühlen Drink. 

Matthias Koch/rs 


Labyrinth 

CPC464(plus)/664l6I2H(pliis) 

ln der CPC 2/3’92 wartete der Rollenspielartikel mit einem 
Programm auf, das den Fluchtweg aus einem Labyrinth be¬ 
rechnet. Nun war dieses Programm recht komplex, und auch 
die Geschwindigkeit mußte der Übersicht halber arg leiden. 
Unser Leser Marcel Schoettel machte sich nun daran, eine 
wesentlich kürzere und vor allem auch schnellere Variante zu 
schaffen. 

Die veröffentlichte Routine beruht auf einem recht einfachen 
Prinzip. So wird immer versucht, an der rechten Außenwand 
derGänge entlang zu gehen. 

Zunächst wird jedoch mittelst DIM a(80,26) ein Feld aus 
Mauersteinen {()) erzeugt. PerZufallsgenerator legt der Com¬ 
puter jetzt einen Ein- und Ausgang (l) fest. 

Mittels RND werden nun Zug um Zug Wegelemente in das 
Feld eingebracht, die ebenfalls mit einer 1 markiert sind. Nun 
wird noch das so entstandene Labyrinth auf den Bildschirm 
gebracht, und die eigentliche Suche kann beginnen. 
Angefangen am Eingang arbeitet sich der Computer in Rich¬ 
tung Ausgang vor. Hierbei wird die sogenannte "Rechte- 
Wand-Methode” angewendet: 
von Norden kommend (1), gehe nach Westen (4); 
von Westen kommend (2), gehe nach Süden (1); 

von Süden kommend (3), gehe nach Osten (2); 
von Osten kommend (4). gehe nach Norden (3). 

Ist die vorge.schlagene Richtung durch eine Mauer gesperrt, 
dann wird die nächste - sofern frei - eingeschlagen. Ein 



Auch die Schlemmer sollen auf ihre Kosten kommen 
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I 



Ariadnefaden markiert auf dem Bildschirm den dtirchlaufe- 
nen Weg. Im Array werden diese Punkte mit einer (2) mar¬ 
kiert. 

Marcel Schoettel/r.s 

Laufschrift einmal anders 


140 DATA "präsentiert." 

150 DATA "LAUFSCHRIFT" 

160 DATA 

Selbstverständlich können Sie die Datazeilen noch ergänzen 
und mit eigenem Text füllen. 

Michel Roseren.s/rs 


CPC464(plus)/664l6I28(i7lus) 

Wer schon einmal eine Laufschrift auf dem CPC program¬ 
miert hat, ist sicher auf so manche Probleme gestoßen. Im 
Normalfall nimmt man jedoch eine Laufschril t, die sich gera¬ 
de von rechts nach links bewegt und somit leicht zu realisie¬ 
ren ist. Etwas schwieriger wird es dann von unten nach oben. 
Die Kombination von unten nach oben und zusätzlich von 
rechts nach links ist jedoch am schwierigsten. Daß nichts un¬ 
möglich ist, zeigt das vorliegende Programm, welches einen 
Text in dieser Form scrollt. Tippen Sie also das abgedruckte 
Lisüng ein, und speichern Sie es. Nun können Sie es starten, 
und die Datei 1 KB4.BIN wird erstellt. Das folgende BASIC- 
Programm startet nun dieScroll-Routine: 

10 MEMORY S7FFF 
20LOAD"1KB4.BIN" 

30 dati^&SOOO 
40 READ a$ 

50 IF a5="*" THENPOKEdati,&ff :GOTO 110 
60 FOR a=l TO LEN{a$) 

70 POKE dati,ASC(MID$(a$,a,1)) 

80 dati=dati4-l 
90 NEXTa 
100 GOTO 40 
110 CALL &8000 
120 END 

130 DATA "CPC INTERNATIONAL " 


Mikro-Roulett 


CPC464(plus)/664/6128(plus) 

Für bis zu drei Spieler ist das Roulctlprogramm ausgelegt. 
Nach dem Start hat jeder der Spielerein Kapital von 100 US- 
Dollar, das es möglichst schnell zu vervielfachen gilt. Da das 
Roulett aus 36 Zahlen mit jeweils zwei Farben (Rot und 
Schwarz) be.steht, können Sie nun auf bestimmte Ereignisse 


setzen: 

Pair: Es handelt sich um eine gerade Zahl, die 

durch zwei teilbarist. 


Impair: Die gewählte Zahl ist nicht durch zwei teilbar. 

Manque: Die Zahl liegt im Bereich Obis 17. 

Passe: DieZahl liegt im Bereich 18bis35. 

Red: DieZahl istrot. 

Black: Es handelt sich um eine schwarze Zahl. 

1. Dozcn: DieZahl liegt im Bereich Obis 11. 

2. Dozen: DieZahl licgtimBereich 12bis23. 

3. Dozen: DieZahl liegt imBereich 24 bis 35. 

Nummer (1-3): Es handelt sich um eine beliebige Zahl (muß 

eingegeben werden). 

Haben alle drei Spieler ihre Wahl getroffen, auf welche Kon- 
stellation sie setzen wollen, beginnt das Roulett. Jede Über¬ 
einstimmung wird nun mit der Verdoppelung des Einsatzes 
belohnt. Ansonsten wird derEinsatzeinbehalten. 

Petr PotLiznik/rs 




100 ' Rekanoid (IkByte) [2078] 

101 ' CPC 664/6128(plus) [1532] 

102 ' (c) 1992 Sebastian Bobach [1312] 

103 ' & CPC International [2118] 

104 MODE 1:PAPER OzBORDER 0:INK 0,0:INK 1, [7005] 
25:INK 2,20:INK 3,15rPEN 3;ENV 1,15,-1,4:P 

RI NT ---\" 

105 FOR a=2 TO 21:LOCATE 1 ,a:PRINT"1“:LOCA [5881] 


TE 32,a:PRINT"l":NEXT:LOCATE 34,2:PRINT"Pu 
nkte:" : LOCATE k, 8: PRINT"Leben:'' 

106 FOR a=2 TO 31:PEN 3:LOCATE a,INT(RND*l [3981] 
1)+2:PRINT CHRS(143):NEXT 

107 FOR 1®1 TO 4:GOSUB 121:IF 1>3 THEN LOC [3522] 
ATE 12,ll:PRINT"GAME OVER":END 

108 CALL &BB18 [389] 

109 PEN l:x«INT(RND*29)+3:y=2;d=-l:b=l;c=l [2477] 
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5 

110 LOCATE x,y:PRINT" ";:LOCATE c,22:PRINT [2779] 

it i<. 

111 IF'rNKEY(8)*0 AND C>2 THEN C=C-1 [1386] 

112 IF INKEY(1)=0 AND C<28 THEN C=C+1 [1713] 

113 x=x+d:y=y+b [1680] 

114 IF x<3 THEN d=l [1007] 

115 IF y=21 AND X<C OR y=21 AND x>c+4 THEN [5049] 
SOUND 1,1911,0,15,l:NEXT ELSE IF y=21 THE 

N b=-l 

116 IF y<3 THEN b=l [1021] 

117 IF x>30 THEN d=-l [949] 

118 IF TEST(X*16-1,(25-y)*16)=3 THEN p=p+l [5696] 
:SOUND 129,106,0,15,l:GOSUB 121:IF y>2 THE 

N b=b*-l 

119 LOCATE x,y:PRINT CHRS(231); [1327] 

120 LOCATE c,22:PRINT"-—:GOTO 110 [2026] 

121 LOCATE 35,4:PRINT p:LOCATE 36,10:PRINT [6063] 
4-1 :IF p=30 THEN LOCATE 14,11 :PRINT''SUPER 

! " : END 

122 RETURN [555] 


100 ' Drink (IkByte) [1588] 

101 ' CPC 464(pluS)/664/6128(pluS) [1940] 

102 ’ (c) 1992 Matthias Koch [900] 

103 ' & CPC International [2118] 


104 MODE 0:INK 0,0,0;INK 13,15:INK 14,23:1 [6684] 
NK 15,15,24:INK 2,24,15:INK 11,15:1NK 10,2 
5:DEG:FOR i%=240 TO 390;MOVE 315,132:DRAW 

i%,250,11:NEXT 

105 FOR a%=l TO 360:PLOT 420+50*COS(a%),30 [12086] 
0+50*SIN(a%):DRAW 420+60*COS(a%),300+60*SI 
N(a%},l:PLOT 315,50:DRAW 315+100*COS(a%),5 
0+20*SIN(a%),7:PLOT 315+104*COS<a%),50+24* 

SlN(a%),14:PLOT 315+75*COS(a%),250+17*SIN( 

a%) ,3 

106 PLOT 424,300:DRAW 424+50*COS(a%),300+5 [9362] 
0*SIN(a%),10:PLOT 315+110*COS(a%),300+24*5 
rN(a%),14:M0VE 315,250:DRAW 315+70*COS(a%) 
,250+14*SIN(a%),11:NEXT 

107 MOVE 424,300:DRAW 315,132,14:MOVE 206, [14222] 
300:DRAW 315,132,14:FOR a%=l TO 360 STEP 4 
5:MOVE 424,300:DRAW 424+51*COS(a%),300+51* 
SIN(a%),l:NEXT:FOR i%=l TO lOiMOVE 310+i%- 
2,50:DRAW 310+i%-2,145,14:MOVE 258+1%,250: 

DRAW 210+i%,350,12:MOVE 210,350:DRAW 210+i 
%,3 

108 MOVE 210,350+i%:DRAW 110,320+1%:NEXT:P [7141] 
LOT 315,200,15:PLOT 315,205,2:PLOT 305,215 
,15:PLOT 305,220,2:PLOT 325,230,15:PLOT 32 

5,235,2:CALL ficBBlS 


100 ' Labyrinth (ikByte) 

110 ' CPC 464(plus)/664/6128{plUB) 

120 ' (c) 1992 Marcel schoettel 

130 ' & CPC International 

140 ON ERROR GOTO 310:DEFINT a-z:MODE 2:DI 

M a(80,26) 

150 'Array 

160 x=63*RND+2:s=63*RND+2:FOR i=0 TO 14:a( 
x+i,l)=l:a(s+i,25)=l:NEXT 

170 a=16:FOR y=2 TO 24:PRINT CHRS(127):FOR 
i=2 TO 79:IF RND*a<7 THEN a{i,y)=l 
180 NEXT:aa24-a:NEXT:a(x+i4,0)=l:CLS 
190 'Print 

200 FOR y»l TO 25:FOR i=l TO 80:IF a(i,y)“ 
0 THEN LOCATE i,y:PRINT CHR$(127); 

210 NEXT:NEXT:c=s230: r=l :y=l 
220 'Suchen 

230 a-0:i=2:b=c:c=144:WHILE y<25:GOSUB 250 
:WEND 

240 a=l:i=0:c=b:WHILE y>l:GOSUB 250:SOUND 
1,y*10,l:WEND:c=C+l:GOTO 230 
250 LOCATE x,y:PRINT CHR$(c):a(x,y)=i:ON r 
GOSUB 260,270,280,290:RETURN 
260 IF a(x-l,y)>a THEN x=x-l:r=4:RETÜRN 
270 IF a(x,y+l)>a THEN y=y+l:r=l:RETüRN 
280 IF a{x+l,y)>a THEN x=x+l:r«2:RETüRN 
290 IF a(x,y-l)>a THEN y«y-l:r=3:RETURN EL 
SE 260 
300 'Ende 

310 LOCATE X-9,1:PRINT’'<KEY>":WHILE INKEYS 


[1940] 

[2032] 

[2118] 

[2880] 

[372] 

[3044] 

[3468] 

[2460] 

[203] 

[4968] 

[1525] 

[357] 

[4240] 

[4352] 

[4787] 

[2006] 

[1797] 

[1065] 

[2553] 

[715] 

[3058] 


= '”':FOR i = 20 TO 50:b=RND*400 

320 SOUND 17+j*32,b:SOUND 10+j*32,b+l.7;IF [3477] 


j THEN SOUND 28,b*2,i 

330 NEXT:j=l-j:WEND:RUN [1407] 


100 ' Laufschrift (IkByte) [1120] 
110 ' CPC 464(plus)/664/6128(pluS) [1940] 
120 ' (c) 1992 Michel Roserens [1780] 
130 ' St CPC International [2118] 


140 M=St8000:FOR D=0 TO 2:READ D$:FOR U=1 T [6640] 

0 LEN(D$)/2:POKE M, VAL( "S<'’+MID$ (DS , (U-l) *2 
+l,2)):M=M+l:NEXT U,D:SAVE "lkb4.bin",B,&8 
000,M-&8000 

150 DATA C312802020535749535320204D4144452 [12666] 

020CDO6B9210O38110038010008EDB0CDÖ9B93E000 

10000CD32BC3E01011A1ACD32BC010000CD38BC3EO 

2CDOBBC0101BCED49012FBDED490102BCED490i31B 

DED490106BCED49010DBDED490107BCED490119BDE 

D49210Ö401100COD5015EOOC573237223EB0101080 

930 

160 DATA O4O15ECOO9EBC1OB78B1FEO0C27O8OD13 [14221] 

E088257FEF8C26C80CD19BD2A16817EFEFFC2A4802 

100507E232216816F26002929293E388467221481F 

3ED73DB803100400E07062EE1D11A77E17E1210F8D 

11A772A14817E23221481120DC2BF80310000FBCDO 

9BBFE20C294800101BCED490128BDED490102BCED4 

901 

170 DATA 2EBDED490106BCED490119BDED490107B [3587] 
CED49011FBDED493E02CD0EBCC900380050 


100 ' Micro Roulette (IkByte) [1519] 

110 ' CPC 464(plus)/664/6128(plus) [1940] 

120 ' (c) 1992 Petr Potuznik [601J 

130 ' & CPC International [2118] 


140 CALL StBC02:INK 2,0:MODE 1:PEN 2:PAPER [8803] 
0:PRINT "Micro Roulette":WINDOW #4,1,40,22 
,24:INPUT #4,"Number of players [i-3]";n:D 
IM c(n),a(n,12),b(n,12) 

150 FOR i=l TO n:WINDOW #i,10+8*i,16+8*i,1 [7529] 
,19:PAPER #i,3:CLS #i:LOCATE #i,4,2lPRINT 

#i,HEXS(i);''.":LOCATE #i, 2,16 rPRINT #i,"_ 

";c(i)=100:GOSÜB 260:NEXT:CLS #4 
TOT LOCATE 1,3:PEN 1:PAPER 3:FOR i=l TO 14 [9019] 

;READ aS;PRINT " ";a$;TAB(15):PRINT:NEXT:P 
APER 0:PEN 2:PRINT:PRINT "Credit in US$:": 

PAPER 3 

170 CLS #4:FOR i=l TO n:FOR j=l TO 12:IF C [4056] 
(i)=0 THEN a(i,j)=0:GOTO 200 

180 LOCATE l,3+j:PRINT "}‘':LOCATE #i,l,3+j [11030] 
:INPUT #i,a(i,j):IF c(i)>=a{i,j) THEN LOCA 
TE #i,l,3+j :PRINT U,USING "#####" ;a (i ,j ) *. 
c(i)«c(i)-a(i,j)tGOSUB 260 ELSE PRINT CHRS 
(7):GOTO 180 

190 IF (j>9)*(a(i,j)>0) THEN PRINT #4,"Wha [5068] 
t number:";:INPUT #4,b{i,j):CLS #4 
200 LOCATE l,3+j:PRINT " ":NEXT [2640] 

210 NEXT:LOCATE #4,1,1:PRINT #4,"Game Star [13060] 
ts:";CHR$(18):FOR j=0 TO 50:SOUND 1,99,3,, 

,,4:WHILE z=a:a=lNT{RND*35.99):b=((RND<0.5 
)-l)*(a>0):WEND: 2 =a:LOCATE #4,20,1:PEN#4,1 
+b:PRINT #4,"*** ";USING "##";a;:PRINT #4, 

" ***":FOR 1=0 TO {j/6)^3:NEXT:NEXT 

220 LOCATE #4,1,1:PEN #4,1:PRINT #4,"Count [11983] 

ing now.":FOR i=l TO n:d(i)=-a(i,l)*((a-1) 

MOD 2=l)-a(i,2)*(a MOD 2=l)+a(i,3)*(a<l9) 
*(a>0)-a(i,4)*(a>18)-a(i,5)*(b=2) 

230 d(i)=2*d(i)-2*a(i,6)*(b=l)+3*{a(i,7)*{ [8858] 

a>0)*(a<l3)+a(i,8)*(a>l2)*(a<25}-a(i,9)*(a 

>24))-36*(a(i,10)*(a=b(i,10))-a(i,il)*(a=b 

(i,ll))-a(i,12)*(a=b(i,12))):FOR j=4 TO 15 

iLOCATE #i,l,j:PRINT #i,CHRS{18):NEXT 

240 IF d(i)>0 THEN FOR k=l TO d(i):c(i)=c{ [3555] 

i)+l:SOUND 1,300,2:GOSUB 260:NEXT 

250 NEXTiPRINT #4:PRINT #4,"Next Game? [Y [4945] 

]es":i$="":WHILE i$="";iS=UPPERS(INKEYS) :W 

END:IF iS="Y" THEN 170 ELSE STOP 

260 LOCATE #i,2,ia:PEN #i,2:PRINT #i,USING [11785] 
"####";c(i):PEN #i,l:RETURN:DATA ,Pair,Imp 
air,Manque(1-18),Passe(19-36),Red,Black,1. 

Dozen,2.Dozen,3.Dozen,Number(1),Number(2), 

Number(3), 
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Gamer’s Message 

Ob Klassiker oder Neuerscheinung: 

So werden schwere Spiele ganz leicht 

Auch in dieser Ausgabeder CPC gibt es wieder eine geballte Ladung von Spie¬ 
letips, die den Frust schon im Keim ersticken lassen. 


Ein Tip für alle Babysiller, die Baby Jo 
sicher nach Hause geleiten wollen: Der 
Code für den zweiten Teil lautet‘"YOU- 
PT”, der für den drillen “GLOUP”, und 
wer direkt in den vierten und letzten 
Abschnitt gelangen möchte, gibt 
“MUMMY” ein. Wer in diesem Teil be¬ 
ginnt, hat allerdings ziemlich schlechte 
Karlen, weil ihm zu Beginn keine Ras¬ 
seln zur Verfügung stehen, mit denen er 
die Feinde abschießen könnte. 


indiana Jome 


Wenn Sie bei Indiana Jones And The 
Last Crusade im Titelbild die Tasten 
<T>, <0> und <D> gleichzeitig 
drücken, leuchtet der Bildschirmrand 
rot auf. Jetzt .starten Sie das Spiel wie 
üblich. Durch Drücken von <SHIFT> 
und <2> kommen Sie einen Abschnitt 
weiter, genauer gesagt bis zum näch¬ 
sten Startpunkt. <SH IFT> und < 1 > ver¬ 
setzt Sie an den Beginn des aktuellen 
Levels zurück, während Sie mit 
<SHIFT> und <3> gleich in den näch¬ 
sten Level kommen. 

Cecco-Spiele werden 
überlistet 

Rajfaele Cecco hat in der Vergangen¬ 
heit eine gajize Reihe hervorragender 
Spiele programmiert. Diese hatten 
meist nur einen kleinen Nachteil: Sic 
waren für Normalsterbliche einige Por¬ 
tionen zu schwer. 

Doch dem kann abgeholfen werden: 
Bei Kxolon wählt man im Menü die Op¬ 
tion “Tasten definieren” aus. gibt dann 
“ZORBA”ein und hat fortan keine Pro¬ 
bleme mehr mit diesem Spiel. 

Ebenso kann man bei Cybernoid 11 
verfahren, nur lautet hier der Code, der 
unendlich viele Leben gibt. “ORG Y”. 
Allen Nachwunchs-Stuntmen. denen 
der Mut fehlt und die trotzdem Super 
Stuntman spielen wollen, kann gehol¬ 


fen werden: einfach in der Highscore- 
Liste Statteines Namens “LIVEWIRE” 
eingeben. Ab gehl die Post! 


Total Kecall 


Radek Kabala aus Winnweiler hat uns 
Tips zu zwei Spielen zugesandt. Der ei¬ 
ne betrifft das Schwarzenegger-Spiel 
Total Recall. das auch auf der Spicle- 
sammlung “2 HOT 2 HANDLE” ent¬ 
halten ist. Wenn Sie einen Highscore 
erzielt haben, tippen Sie in die High- 
scorc-Liste “THE END IS NiGH” ein. 
Im Menü erscheint nun der Schriflzug 
“TEST MODE ACTIVE”. Wenn Sie 
nun während des Spiels die Tasten 
<F4>, <F6> und <Cursor nach unten> 
gleichzeitig drücken, kommen Sie in 
den nächsten Level. 

Der zweite Cheat ist für Teenage Mu¬ 
tant Hero 'lYirtles (gemeint ist das erste 
Spiel, nicht die neue Automalcnumset- 
zung). Während des Spiels die Tasten 
<SHIFT>, <G>, <0> und <1> gleichzei¬ 
tig drücken, und Sie sind unverwundbar. 


Turtleö 


Trotzdem kann cs sein, daß man sich im 
dritten Level festbeißl. Hier stellt ein¬ 
sam und verlassen ein Lastwagen her¬ 
um. In diesen kann man einsteigen, in¬ 
dem man gleichzeitig Feuer und nach 
unten drückt. Wenn man vorher vom 
Schwert auf die Schüsse umgeschaltet 
hat, ist es kein Problem mehr, die 
Straßensperre aus dem Weg zu räumen. 
Richtig spekulieren heiß es bei Conti¬ 
nental Circus. Wenn der Motor raucht, 
lohnt sich eine Reparatur nicht in allen 
Fällen, sondern nur dann, wenn die 
Strecke bis zum Ziel noch lang, aber re¬ 
lativ einfach ist. Nach einem starken 
Crash, der viel Zeit kostet, ist der Motor 


auch wieder in Ordnung. Wenn also zu 
befürchten ist, daß man in den nächsten 
Sekunden einen solchen Unfall hat, 
lohnt sich die Reparatur kaum. Und 
kurz vor dem Ziel sowieso nicht - ein 
paar Sekunden läuft der Rennwagen 
schon noch weiter. 

Die schwierigste Stelle von Hudson 
Hawk kommt ziemlich am Anfang des 
Spiels. Wenn Sie ganz nach rechts 
durchgelaufen sind, gehl's nicht mehr 
weiter. Das offene Fenster ist recht 
hoch gelegen - Hudson erreicht es mit 
seinen Sprüngen nicht. 

Eine recht ungewöhnliche Methode 
hilft dem kleinen Einbrecher weiter. 
Auf einem Fensterbrett befindet sich 
ein Block. Diesen sollten Sie durch 
Hochspringen ein paar Pixel weiter 
nach links schieben. Nun widmen Sie 
sich dem Block, der auf der Erde steht, 
und schieben diesen ebenfalls nach 
links; so weit, daß er ungefähr zwei 
Zentimeter vom Rand des Fensterbretts 
entfernt steht. Auf diesen Block sprin¬ 
gen Sie nun und warten so lange, bis ei¬ 
ner der Vögel von links oben herunter- 
stößt, an ihnen vorbcifliegt und nach 
rechts oben verschwindet. 


Hudeon Hawk 


Kurz nach seinem Start von links oben 
springen auch Sie, so daß Sie den Vogel 
auf halber Höhe berühren. Durch den 
Energieverlust schwebt Hudson ein 
Stück höher und kommt schließlich auf 
dem Fensterbrett an. Dort verschieben 
Sie den Block an den linken Rand des 
Bretts, springen drauf und können nun 
das offene Fenster bequem erreichen. 

Erste Hilfe für Fassa¬ 
denkletterer 

Nun geht s leichter weiter. Auf den Flu¬ 
ren nicht hektisch werden, vor allem, 
wenn es um die Liquidierung der Geg¬ 
ner und ums Ausweichen vor der Vi¬ 
deokamera gehl, ln den Gängen gibt es 
Ventilatoren, die Hudson bei 
Berührung zerbröseln lassen. Kurz vor 
jedem Ventilator gibt es jedoch einen 
Schalter, der das Gebläse vorüberge¬ 
hend abschaltel und Ihnen ein sicheres 
Passieren ermöglicht. Allerdings mü.s- 
sen Sie schnell sein. Die Zeit, während 
der die Geräte ausgeschaltet bleiben, ist 
sehr knapp bemessen. 
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Irgendwann sind Sie dann bei den ge¬ 
suchten Pferdebildcrn angelangt. Hier 
muß man die Bilder abschießen, um 
weiterzukommen. An manchen Stellen 
müssen Sie sich ganz vorsichtig voran¬ 
tasten. Am leichtesten geht dies durch 
Hochspringen. Bei jedem senkrechten 
Sprung bewegt sich die Spielfigur eine 
Winzigkeit nach vorne; viel genauer, 
als man es mit Rechts- oder Linksbewe¬ 
gungen des Joysticks schafft. 


Toyota Celica 


Der mitgelieferle Beifahrer von Toyota 
Celica GT Rally sollte nach Möglichkeit 
immer durch eigene Hinweise ersetzt 
werden. Es ist eine große Hilfe, wenn 
man auch angedeutet bekommt, wie 
scharf die Kurve ist, und wenn man sich 
darauf verlassen kann, auch wirklich auf 
jede Kurve aufmerksam gemacht und 
nicht “aus Versehen“ in die falsche Rich¬ 
tung geschickt zu werden. Gehen Sie also 
jede Strecke selbst durch, und setzen Sie 
Ihre eigenen Markierungen. 

Auf dem Schiff von Mindshadow ist 
für Rend Klimek aus Magdeburg End¬ 
station. Auf seine Frage, was hierzu tun 
ist, können wir ihm folgendes antwor¬ 
ten: Das Fleischermesser ist anschei¬ 
nend sehr stabil. Mit diesem läßt sich 
nämlich nicht nur Fleisch schneiden, 
sondern auch die Ankerkette durcht¬ 
rennen. Hat man dies getan, hält das 
Schiff an. Wie schon in der letzten Aus¬ 
gabe erwähnt, sollte man sich aber vor 
dem Verlassen des Schiffes noch das 
Segeltuch besorgen. 



Bei Swap gibt es Spielfelder voller 
winzig kleiner Steinchen, so daß einen 
fast Mut und Geduld vcrla.ssen könn¬ 
ten. Nicht verzweifeln, sondern einfach 
gut verteilt ein paar Steinchen ver¬ 
schwinden lassen, damit Hohlrüume 
entstehen können. Jetzt alles lose Her¬ 
umhängende hinuntcrfallen lassen, 
dann beginnt eine Kettenreaktion, und 
die Well sieht schon wieder viel besser 
aus. Dies kann man gegebenenfalls 
mehrmals wiederholen, bis der Bild- 
schiimfast leerist. 


Im harten Kampf in der Arena von 
WWF Wrestlcmania sollte man den 
Gegner erst schwächen, bevor man sich 
auf ein Handgemenge cinläßt. Dazu 
kann man zum Beispiel rnehnnals den 
fliegenden Kick anwenden. Gegen die 
Seile lehnen, warten, bis der Gegner 
kommt, Joystick in Richtung des Seils 
und zweimal Feuer diücken. Dies funk¬ 
tioniert jedoch nicht beliebig oft, ir- 
gendw'ann weicht der Gegner aus. 
Doch jetzt hat er nicht mehr so viel 
Kraft, und man kann sich vielleicht 
schon auf einen Ringkampf mit ihm 
einlassen. 


3.A.T 


B.A.T. bereitet MikaTöwe aus Verden 
Probleme. Am Eingang zu Crisa Korta- 
kis Wohnung wird er immer vom 
Wächter abgewiesen. Was ist zu tun, 
um an diesem vorbeizukommen? Auch 
in die Ruine gelangter nicht. Der Com¬ 
puter teilt ihm mit, daß vor dem Betre¬ 
ten der Wohnung tioch eine bestimmte 
Aktion auszuführen sei. Wer weiß, wel¬ 
che dies ist? 

Einen kleinen Trick, um Zeit zu sparen, 
gibt es bei den Frecscape-Spielen Dril- 
ler. Dark Side. Total Eclipse und 
Castle Master: Wenn man eine längere 
Strecke in die gleiche Richtung gehen 
will, drückt man den Joystick nach 
oben und gleichzeitig die Taste <Cur- 
sor nach oben>. Die Bewegungsge¬ 
schwindigkeit ist nun verdoppelt. Auf 
die gleiche Art und Weise kann man 
sich auch schneller drehen. Dieser 
Trick funktioniert auch bei allen mit 
dem 3D-Construction-Kit erstellten 
Spielen. 

Rene Klimek hat Probleme mit The 
Bard’sTale. Er hat die “Onyk Keys” in 
“Kyleran’s Tower” erhalten. Doch die 
Tore von Mangars Festung bleiben für 
ihn fest verschlossen. Kein Problem ist 
der Zugang zum letzten der fünf Dun¬ 
geons, wenn man zurück ins erste Ver¬ 
lies geht. Im untersten Level der “Se- 
wers” befinden sich nämlich irgendwo 
Stufen. Wenn man allen Mut zusam¬ 
mennimmt und diese betritt, findet man 
sich bald in “Mangar's Tower” wieder. 
Wenn man bei den Action-Labyrinth- 
Oldies Gauntiet oderGauntlet II weit 
kommen will, spielt man abwechselnd 
mit zwei Spiclfiguren. Kurz bevor der 
ersten Spielfigur die Energie ausgeht, 


erweckt man die zweite zum Leben und 
spielt mit dieser weiter. So kann man 
praktisch unbegrenzt weit in das Spiel 
Vordringen. 

Selbstmord kann 
nützlich sein 

Wenn man sowieso zu zweit ist. geht 
die Sache natürlich einfacher. Hier 
heißt es nur aufpassen, daß nicht beide 
Spieler gleichzeitig ihr Leben aushau- 
chen, sonst ist es vorbei mit der Wieder¬ 
belebung. Immer dann, wenn es so aus- 
sieht, als ob dieser Fall eintreten könn¬ 
te, muß sich ein Spieler opfern und 
Selbstmord begehen, um rechtzeitig 
wieder da zu sein, wenn der andere 
stirbt. 

Die Turbo-ßoosler im ersten Level von 
Out Run Europa sind großzügig be¬ 
messen. Deshalb sollte man nicht zö¬ 
gern und einige davon verwenden, um 
der Polizei zu entkommen. 

Martin van der Veer aus Berlin spielt 
auf seinem PCW gerne das Spiel After 
Shock. Leider ist es ihm aber noch 
nicht gelungen, auf legalem Weg die 
Erdspalte zu überwinden. Wer weiß 
hier einen Rat? 

Andreas Lober/jg 



Haben auch Sie Tips oder Komplctt- 
lösungen zu Spielen? Dann teilen 
Sie uns diese doch bitte mit, so daß 
auch andere Leser davon profilieren 
können. Oder hängen Sie irgendwo 
verzweifelt fest und kommen nicht 
weiter? Auch in diesem Fall können 
Sie uns einfach schreiben. Wenn wir 
Rat wis.sen, helfen wir natürlich wei¬ 
ter. Wenn nicht, geben wir die Frage 
an unsere Leser weiter. Bestimmt 
hat ein anderer dasselbe Problem be¬ 
reits gelöst. 

Ihre Briefe richten Sie bitte an: 
DMV-Verlag 

Redaktion CPC International 
Posrfach250 
W-3440 Eschwege 
und versehen diese mit dem Kenn¬ 
wort “Gamer's Message”. 
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Search & Hide 

Worträtsel leichtgemacht 

Zahllose Rätselhefte teilen dem Leser die Rolle des 
Suchenden zu. So müssen innerhalb eines Buchstaben¬ 
wirrwarrs unzählige Begriffe aufgestöbert werden. 

Aus anfänglicher Begeisterung kann dann sehr schnell 

Verzweiflung werden. Warum nicht dem Computer die 

Arbeit überlassen? 

Buchstabenrätsel sind ab sofort kein Problem mehr. Das Pro¬ 
gramm Search sucht Ihnen in rasanter Geschwindigkeit die 
gewünschten Worte. 

Tippen Sie also das Listing ab, und starten Sie es nach dem 
Abspeichern. Als Benutzer von Search können Sie nun ent¬ 
weder ein bereits gespeichertes Rätselfeld einladcn oder aber 
ein SuchrätscI aus einerZeitschrift eintippen. Im zweiten Fall 
erlaubt Search das Abspeichem der Daten. 

Das geladene beziehungsweise eingegebene Suchrätsel wird 
in dem zweidimensionalen Feld “f$” abgelegt. Neben dem 


String-Feld wird außerdem noch ein entsprechend großes 
Zahlenfeld ‘T’ angelegt, das an Jeder Position den Wert 0 be¬ 
sitzt. Durch dieses Feld ist es später möglich, die gefundenen 
Worte zu identifizieren. Wird nämlich ein Wort gefunden, 
werden die gefundenen Positionen auf 1 gesetzt. Nachdem 
jetzt noch der Bildsch i rmmodus abgefragt wurde, können Sie 
die zu suchenden Wörter eingeben. 

Bei jedem eingegebenen Wort trennt der Computer den ersten 
Buchstaben ab und speichert ihn in der Variable “bu$”. Die 
Wortlänge wird in “wl” gespeichert. Nun sucht der Computer 
von links oben bis rechts unten nach dem Anfangsbuchsta¬ 
ben. Im Erfolgsfall verzweigt das Programm in die Unterrou¬ 
tine “Suchen”. 

Hide - der Gegenangriff 

Selbstverständlich möchte man auch gerne seine Freunde mit 
solchen Worträtseln beglücken. Hierzu eignet sich das erste 
Li.sting hervoiTagend. So schnell und vor allem einfach hätte 
es bestimmt mancher Erfinder von Suchrätseln gerne gehabt. 
Sie geben lediglich die Rätselgrößc sowie die zu verstecken¬ 
den Worte ein. Alles andere übernimmt der Computer. 

Thomas Hombert/rs 


100 ' Search 6 Hide £736] 

110 ' Verstecken von Worten [1605] 

120 ' CPC 464(plus)/664/6128(plus) [1940] 

130 ' (c) 1992 Thomas Horabert [1542] 

140 ' & CPC International [2118] 

150 ' [117] 

160 ' Eingaben [1013} 

170 ' [117] 

laO i$=CHR$(24) [1139] 

190 MODE 1 [500] 

200 INPDT"Buchstaben pro Zeile :’',hor [1992] 

210 INPUT”Anzahl der Zeilen :’',ver [2365] 

220 lNPUT'*Wieviele Woerter verstecken [4130] 

wort 

230 DIM feld$(hor+i,ver+l),wort$(wort+l),a [3866] 
nt(wort+l),verstecfct$(wort+l) 

240 ' [117] 

250 ' Woerter eingeben [1290] 

260 ' [ll"^] 

270 MODE l:FOR a=l TO Wort [1183] 

280 LOCATE l,a+2:PRINT RIGHTS(STR$(a),LEN( [6876] 

STRS(a))-l);5iNPUT". Wort :",wort$(a):wort 
S{a)=UPPER$(wortS(a)) 

290 IF LEN{wortS(a))>hor AND LEN(wortS(a)) [6522] 

>ver THEN LOCATE 1,1:PRINT"ZÜ LANG":CALL & 

BB18:LOCATE 1,1:PR1NT SPACES(7):GOTO 280 

300 IF wort$(a)=‘"' THEN dummy=a:a=wort+i:w [3070] 

ort=dummy-l 

310 NEXT [350] 

320 MODE 1 [506] 

330 ' [117] 

340 ' Hauptprogramm [1580] 

350 ' [117] 

360 hide=hide+l:try=0:ready=0 [ßl7] 

370 richtung=lNT(RND*2)+l;wduromy$="":IF ri [11199, 
chtungs=l THEN wduniitiyS=wortS(hide) ELSE FOR 
a=l TO LEN(wortS{hide)):wdummy$=MIDS(wort 
S(hide),a,l)+wdummy$:NEXT 

380 length=LEN(wdummyS) [ 600 ] 

390 IF hide=wort+l THEN 710 [985] 

400 try*try+i:IF try=200 THEN LOCATE l,l:P [9241] 

RINT SPACES(40):LOCATE 1,1:PRINT"Das Wort 
"wdununyS" kann nicht versteckt werden" :CAL 
L &BB18:GOTO 360 

410 MODE 1 [506] 

420 versuch“0 [563] 

430 GOSUB 460 [968] 

440 IF ready=l THEN zaehler=zaehler+i;vers [5423] 
teckt$(zaehler)=wort$(hide):GOTO 360 ELSE 
400 

450 ' [117] 

460 ' Verstecken [896] 

470 ' [117] 


480 richtung2=lNT(RND*4)+i;lF richtung2=l 
THEN rS="HORIZONTAL" ELSE IF richtung2=2 T 
HEN rS="VERTIKAL" ELSE r$="DIAGONAL" 

490 IF (richtung2=3 OR richtung2=4) AND le 
ngth>MIN(hor,ver) THEN 480 
500 GOSUB 880 

510 versuch=versuch+l:ywe=INT(RND*ver)+l:x 
we=INT(RND*hor)+l 

520 IF versuch>20 THEN ready=0:RETURN 
530 IF richtiing2=l AND xwe+length-l>hor TH 
EN 510 

540 IF richtung2=2 AND ywe+length-l>ver TH 
EN 510 

550 IF richtung2=3 AND (xwe+length-l>hor 0 

R ywe+length-l>ver) THEN 510 

560 IF richtüng2=4 AND (xwe-length-H<l OR 

ywe+length-l>ver) THEN 510 

570 FOR a=l TO length 

580 IF richtung2=l THEN IF feldS(xwe+a-1,y 
we)<>"" AND feld$(xwe+a-l,ywe)<>MIDS(wduinm 
y$,a,l) THEN 510 

590 IF richtung2=2 THEN IF feldS(xwe,ywe+a 
-!)<>"" AND feldS(xwe,ywe+a-l)<>MID$(wdujnm 
y$,a,l) THEN 510 

600 IF richtung2=3 THEN IF feldS(xwe+a-1,y 
we+a-l)<>"" AND feld${xwe+a-l,ywe+a-l)<>Ml 
D$(wdununy$,a,l) THEN 510 

610 IF rlchtung2=4 THEN IF feldS{xwe-a+l,y 
we+a-i)<>"" AND feldS(xwe-a+l,ywe+a-i)OMI 
DS(wdumniy$,a,l) THEN 510 
620 NEXT 

630 FOR a=l TO length 

640 IF richtung2=l THEN feld$(xwe+a-l,ywe) 
=MIDS(wdummyS,a,1) 

650 IF richtung2=2 THEN feldS(xwe,ywe+a-l) 
=MID$(wduinmy$ ,a,l) 

660 IF richtung2=3 THEN feld$(xwe+a-l,ywe+ 
a-1)=MID$(wdummyS,a,1) 

670 IF richtung2=4 THEN feidS(xwe-a+l,ywe+ 
a-1)=MIDS(wdummyS,a,1) 

680 NEXT:ready*1:RETURN 
690 MODE 1 
700 ' 

710 ' Ausgaben 
720 • 

730 PRINT:PRINT"Ausgabe auf":PRINT i$+"D"+ 
i$+*'rucker, "+iS+"B"+iS+"ildschirm, D"+i$+ 
"i"+i$ + "skette":PRINT:PRINT" oder "+iS4"E'' 
+iS;:INPUT"nde ";ausg$:ausgS=UPPERS(ausg$) 
:IF ausgS="E" THEN MODE 1:END 
740 IF ausg$="B" THEN INPUT"ModuB fuer Bil 
dschirmausgabe (1/2) :",modus 
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Tips & Tricks 


750 IF modus=0 THEN modus=i 

760 MODE modus 

770 IF again=l THEN 790 

780 INPUT"Loesung zuerst zeigen '*;loesS:lo 
esS=UPPER$(loes$) :MODE niodus:IF loesS="J" 
THEN FOR lr=l TO horrFOR OU=l TO veriLOCAT 
E lr,ou:PRrNT feld$(lr,ou):NEXT:NEXT:CALL 
&BB18 

790 IF ausgS*"B" THEN ausg=0 ELSE IF ausgS 
=’'D" THEN ausg=8 ELSE ausg=9:INPUT”Name (o 
hne Ext.) :",nara$:OPENOUT nain$+".dat":PRIN 
T#9,hor,ver 

800 LOCATE 1,1:F0R ou*l TO ver:FOR lr=l TO 
hor:IF feldS(lr,ou)='”' THEN feld${lr,ou)= 
CHRS(INT(RND*26)+65) 

810 z$=z$+feldSUr,ou) :NEXT:PRINT#ausg,z$: 
zS="":NEXT:PRINT#ausg:IF ausg=9 THEN CLOSE 
OUT:again=l:GOTO 710 
820 ' 

830 'versteckte Begriffe ausdrucken {nur b 
ei Druckerwahl) 

840 ' 

850 IF ausg=8 THEN FOR a®l TO zaehler:PRIN 
T#8,versteckt$(a):NEXT;again=l:GOTO 710 
860 again=l:GOTO 710 
870 ' 

880 ' Unterprogramm: Verstecken anzeigen 
690 ' 

900 LOCATE 1,1:PRINT SPACES(40):LOCATE 1,1 
:PRINT wdummyS+" wird "+rS+" versteckt":RE 
TURN 


[1253] 

[903] 

[353] 

[12506] 


[5561] 


[4466] 

[5473] 


[117] 

[4755] 

[117] 

[5949] 


[818] 

[117] 

[2784] 

[117] 

[6618] 


100 ' Search & Hide 
110 ' Suchroutine 

120 ' CPC 464(plus)/664/612e(plus} 

130 ' (c) 1992 Thomas Hombert 
140 ' & CPC International 

150 ' 

160 ' Vorbereitung & Eingaben 
170 ' 

180 iS=CHR$(24):MODE 1 
190 ' 

200 ' Feld laden 
210 ' 

220 INPUT"Feld laden (j/n) ";dS:IF UPPER$( 
dS)<>"J'' THEN 290 ELSE INPUT"Naine (ohne Ex 
t.) : ",na$:OPENIN naS+".dat":INPUT#9,br, 1 
a:DlM f$(br+l,la+l),f(br+l,la+l) 

230 FOR b=l TO la'.LINE INPUT#9,aS : 1=1 + 1:FO 
R a=l TO br:fS(a,l)=MID$(aS,a,l):NEXT a,b: 
CLOSEIN 

240 INPUT"Welcher Bildschirm-Modus (1/2) : 
",mo:IF iiio=0 THEN ino=l 
250 MODE motGOTO 400 
260 ' 

270 ' Feld eingeben 
280 ' 

290 MODE 1 

300 LOCATE 1 ,1:PRINT"SEARCH”:PRINT:PRINT:I 
NPUT"Wieviele Buchstaben pro Zeile ”;br:IN 
PUT"Wievielo Zeilen ";la:DIM f $(br+l,la+1) 
,f(br+l,la+i) 

310 FOR ya=l TO la;PRlNT''Zeile "ya?:INPUT 
" :'’,zeiiS(ya):FOR xa=l TO br:f$(xa,ya)=ÜP 
PERS(MIDS(zei1S(ya),xa, 1 )):NEXT:NEXT 
320 IF br>30 THEN IHO=2 ELSE mo=l 
330 ' 

340 ' Feld speichern 
350 ' 

360 MODE mo:INPUT"Feld speichern ”;d$:IF U 
PPERS(d$) = "J’' THEN INPUT"Name (ohne Ext.) 

: ",naS:OPENOUT naS+".dat":PRINT#9,br,la:F 
OR b=l TO la:FOR a=l TO br:PRINT#9,f$U»1) 
;:NEXT: PRINT#9 :NEXT:CLOSEOUT 
370 ' 

380 ' Feld zeigen 
390 ' 

400 MODE rao:FOR ya=l TO la:FOR xa=l TO br: 
LOCATE 3+xa,3+ya:PRINT fS(xa,ya):NEXT:NEXT 
:FOR X=1 TO brtLOCATE 3+X,2:PRINT RIGHT$(S 
TR${x) ,1) :NEXT:FOR y=l TO la:LOCATE 1,3+y: 
PRINT RIGHT$(STRS(y)il):NEXT 
410 ' 
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[117] 

[1255] 

[117] 
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[4787] 
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[117] 

[895] 

[117] 

[506] 

[8831] 


[6682] 


[1408] 

[117] 

[1033] 

[117] 

[11950] 


[1312] 

[117] 

[13378] 


[117] 


420 

430 


Hauptprogramm 


440 ende=0:LOCATE 23,24:PRINT SPACE$(15):L 
OCATE 1 ,24:INPUT"Welches Wort suchen ”;wor 
tS:wortS=UPPER$(Worts):wl=LEN(wortS):IF wo 
rtS="" THEN GOTO 710 

450 buS=LEPT$ (Worts ,1):w$=wortS:w2S=wortS: 
FOR ya=l TO la:FOR xa=l TO br:IF fS(xa,ya) 
=bu$ THEN LOCATE 3+xa,3+ya:PRINT i$+f$(xa, 
ya)+i$ ELSE 500 
460 GOSUB 540 

470 pl$="":p2$="":p3$=”":p4S="":p5S="":p6$ 
:p7$ = "" :p8$ = "'' 

480 IF ende=l THEN ya=la+l:xa=br+l 
490 LOCATE 3+xa,3+ya:PRINT fS(xa,ya) 

500 NEXT:NEXT 

510 IF ende=l THEN 440 

520 GOSUB 690:LOCATE 1,1 :PRINT''NICHT GEFUN 
DEN":CALL &BB18:GOSUB 690:GOTO 440 
530 ' 

Unterprogramm: Suchen 


540 

550 

560 

570 


THEN p2$=p2$+f$(xa,y [2509] 
[4161] 
[3244] 
[4963] 

[3844] 

[6799] 

[5305] 


[350] 

[6830. 


FOR c=l TO Wl 

IF NOT ya+wl-i>la THEN pl$=piS+f$(xa,y 
a+c- 1 ):' nach unten 
580 IF NOT ya-wl+l<l 
a-c+ 1 ):' nach oben 
590 IF NOT xa+wl-l>br THEN p3S=p3S+f$(xa+c 
-l,ya):' nach rechts 

600 IF NOT xa-wl+l<l THEN p4S=p4$+f$(xa-C 
+l,ya):' nach links 

610 IF NOT (ya+wl-l>la OR xa+wl-l>br) THEN 
p5S=p5S+fS(xa+c-1,ya+c-l);' nach unten/re 
chts 

620 IF NOT (ya-wl+l<l OR xa+wl-l>br) THEN 
p6S=p6S+fS(xa+c-1,ya-c+l):' nach oben/rec 
hts 

630 IF NOT (ya+wl-l>la OR xa-wl+l<l) THEN 
p7S=p7S+fS(xa-c+1,ya+c-l):' nach unten/li 
nks 

640 IF NOT (ya-wl+l<l OR xa-wl+l<l) THEN 
p8S=p8S+f$(xa-c+l,ya-c+l):' nach oben/lin 
ks 

650 NEXT 

660 IF NOT {plS=wS OR p2S=W$ OR p3S=wS OR 
p4$=wS OR p5S=wS OR p6S=w$ OR p7S=w$ OR p8 
$=wS) THEN ende=0;RETURN 

670 FOR C=1 TO wl:GOSUB 810:LOCÄTE 34xp,3+ 
yp:PRINT iS /fS(xp,yp) ;iS :f (xp,yp’)=l:NEXT:C 
ALL &BB18:FOR C=1 TO wllGOSÜB 810:LOCATE 3 
+xp,3+yp;PRINT f$(xp,yp):NEXT:ende=l:RETÜR 
N 

680 pl$=”":p2$ = '"’;p3$='"':p4S = "":p5S = ''":p6$ 
= " '':p7$=" '':pß$ = " " 

690 LOCATE 1,1:PRINT SPACES( 30 ):RETURN 
700 ' 

710 ' Loesung drucken 
720 ' 

730 LOCATE 1,24:INPUT"Loesung auch auf Dru 
cker ausgeben (j/n) ";d$:IF UPPERS(d$)="J" 
THEN d=8 

740 MODE mo:F0R ya=l TO la:F6R xa=l TO br: 
LOCATE 3+xa,3+ya:IF f(xa,ya)=l THEN PRINT 
iS;:IF d=8 THEN :PRINT#8,CHR$(27)+"-"+CHRS 
{!);:'* Druckersteuerzeichen fuer "continu 
ous underlining ON" 

750 PRINT#d,f$(xa,ya); 

760 IF f(xa,ya)=l THEN PRINT iS;:IF d=8 TH 
EN PRINT#8,CHRS(27)+"-"+CHRS(0);:'* Drucke 
rsteuerzeichen fuer "continuous underlinin 
g OFF" 

770 NEXT;PRINT#d 
780 NEXT 

IF d=0 THEN END ELSE d=0:GOTO 740 
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[937] 

[2285] 

[1269] 

[1956] 

[ 1022 ] 

[238] 

[5267] 

[117] 

[1580] 

[117] 

[1084] 

[2028] 


790 

600 

810 

820 

830 

840 


'Unterprogramm: Positionierung 


IF pl$=wS THEN xp=xa:yp=ya+c-l 
IF p2$=w$ THEN xp=xa:yp=ya-c+l 
850 IF p3$=wS THEN xp=xa+c-l:yp=ya 
860 IF p4$=w$ THEN xp=xa-c+l:yp=ya 
870 IF p5$=wS THEN xp=xa+c-l:yp=ya+c-l 
880 IF p6S=wS THEN xp=xa+c-l:yp=ya-c+l 
890 IF p7$=w$ THEN xp=xa-c+l:yp=ya+c-l 
900 IF p8$=w$ THEN xp=xa-c+l:yp=ya-c+l 
910 RETURN 
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Hardware-Striptease 

Ein Blick in den CPC 

Da steht er vor Ihnen, der CPC. Aber haben Sie sich schon einmal Gedanken 
gemacht, wie er eigentlich funktioniert? Diese Frage beantwortet Ihnen der 
folgende Artikel. Außerdem erfahren Sie, wie Sieeventuelle Kleinreparatu¬ 
ren selbst vornehmen können. 


Die verschiedenen Typen der CPC- 
Reihe ähneln sich in ihrem Aufbau. Ei¬ 
ne Ausnahme machen hier die Geräte 
der Plus-Serie, die bauteilemäßig völ¬ 
lig anders organisiert sind. Die her¬ 
kömmlichen CPCs unterscheiden sich 
größtenteils nur durch unterschiedli¬ 
ches Layout der Leiterplatte und des 
Gerätes. Wirft man einen Blick auf die 
Schaltpläne, so findet man die Abwei¬ 
chungen erst bei genauerem Hinsehen. 
Das wichtigste Bauteil im CPC ist un¬ 
bestritten der Mikroprozessor Z80. Er 
wird auch kurz als CPU bezeichnet. 
Dieser hochintegrierte Schaltkreis ist 
in einem 40poligen Gehäuse unterge¬ 
bracht. Diese 40 Leitungen kann man i n 
vier Kategorien einieilen. Dies sind die 

- Versorgungsleitungen: Diese dienen 
der Zuführung der Versorgungsspan¬ 
nung und des Arbeitstaktes. 

- Adreßleitungen: Dies sind 16 Aus¬ 
gangsleitungen, die zusammengenom¬ 
men ein Ziel im RAM oder der Periphe¬ 
rie adressieren. 

- Dalenleitungen: Über diese acht Lei¬ 
tungen können Daten gesandt oder ge¬ 
lesen werden, sie sind bidirektional. 

- Steuerleitungen; Durch diese fünf 
Eingangsleitungen und acht Ausgangs¬ 
leilungen hält der Mikroprozessor so¬ 
zusagen Kontakt mit seiner Umwelt. 
Über die Eingangsleitungen erhält er 
jeweils Signale, die seine Arbeit in ir¬ 
gendeiner Form unterbrechen. Mit den 
Ausgangsleitungen teilt er seiner Peri¬ 
pherie mit. was er gerade beabsichtigt, 
beispielsweise ob die ausgegebene 
Adresse für den Speicher oder die Peri¬ 
pherie ist. 

Der Chef hat 40 Beine 

An zweiter Stelle muß man den ROM 
setzen. Der ROM ist ein “Nur-Lese- 
Speicher”, der einmal seine Daten vom 
Hersteller aufgebrannt bekommt und 
diese auch ohne Stromversorgung 
behält, ln ihm sind alle Vorgänge ge¬ 
speichert, die die CPU nach dem Ein¬ 
schalten des Rechners durchführen 
muß. Ebenfalls im ROM untergebracht 


sind alle Routinen, die benötigt wer¬ 
den, um den CPC richtig benutzen zu 
können. Das si nd beispielsweise Unter¬ 
programme zur Tastalurcingabe und 
zur Bildschirmausgabe. Alle Routinen 
zusamraengefaßt bezeichnet man als 
Betriebssy.Stern. Auch das BASIC ist 
im ROM enthalten. Für jeden CPC-Typ 
gibt es eine spezielle ROM-Variante. In 
der jeweils neueren Version wurden 
Programmfehler von der Vorgänger- 
version ausgemerzt. Die Software 
mußte ja auch an diejeweils fortschritt¬ 
lichere Hardware angepaßt werden. 

Jedem seinen ROM 

Leider hat dieses Vorgehen aber einen 
entscheidenden Nachteil: Durch Um¬ 
stellungen im Betriebssystem ändert 
sich die Lage der Programme im ROM. 
Manche Programmierer optimieren die 
Geschwindigkeit der Programme, in¬ 
dem sie direkt die Routinen im ROM 
ihres CPCs anspringen. Auf ihrem ei¬ 
genen Computer funktioniert dann al¬ 
les ganz toll. Möchte nun aber jemand 
die Programme auf einem anderen, 
nicht typengleichen CPC benutzten, 
läuft auf einmal nichts mehr. Deshalb 
sollten Programme, die auch von ande¬ 
ren Usern benutzt werden, stets nur die 
Sprungvektoren im Arbeitsspeicher 
benutzen. 

Der RAM ist ein “Schreib-Lese-Spei¬ 
cher”, der aber im Gegensatz zum 
ROM bei Ausfall der Versorgungs¬ 
spannung seine Daten vergißt. Der 
RAM ist in verschiedene Bereiche auf- 
geteilt. 

&0000-&003F: Restart-Adressen des 
Betriebssystems 

&0040-HIMEM: frei für BASIC und 
Anwenderprogramme 
HIMEM-&BFFF: Arbeitsbereich für 
BASIC und Betriebssystem; Sprung- 
vekloren 

&C000-&FFFF; Bildschirmspeicher 

HIMEM ist die Grenze für den freien 
Anwenderspeicher. Sie wird durch die 


jeweilige Rechnerkonfiguration be¬ 
stimmt. Die Sprungvektoren sind Spei- 
chcrstellen, auf denen ein Sprung auf 
ein Unterprogramm {beispielsweise 
Taslatureingabe) im Betriebssystem- 
ROM abgelegt ist. Diese Vektoren lie¬ 
gen bei allen CPCs auf demselben Platz , 

und machen damit die Betriebssystem- I 
Programmierer unabhängig von festen 
Adressen. Auch erhält damit der An¬ 
wender die Möglichkeit, die Vektoren 
zu ändern, um eigene Programme an- j 
springen zu lassen. 

Strom weg - Daten weg 

i 

Ein Mädchen für alles ist das Gate-Ar- | 
ray. Es koordiniert alle Vorgänge im , 
Rechner und sorgt so beispielsweise ^ 
dafür, daß die CPU und der Videopro¬ 
zessor niemals gleichzeitig auf den 
RAM zugreifen. Der Videoprozessor 
hat hierbei die höhere Priorität, greift er 
gerade auf den RAM zu, erhält die CPU 
ein Wartesignal. Damit die gerade an¬ 
liegenden Daten während dieses War¬ 
tezyklus nicht verlorengehen, werden 
sie in einem Latch zwischengespei¬ 
chert. Aus den jeweiligen Speicherstel¬ 
len, die der Videoprozessor adressiert, 
liest das Gate-Array die Daten aus und 
bildet daraus die Bildinformation für I 
den Monitor. Es verwaltet die Farbta- 
belle und merkt sich, welche Farben 
welchen PEN-Nummern zugeordnet 
sind. Damit nicht genug, kümmert sich 
das Gate-Array auch noch um die Ver¬ 
waltung der Speicherbänke. So ermög¬ 
licht das Gate-Array die Nutzung der 
zweiten 64-kByte-Bank beim CPC 
6128. 

Die Aufgabe des Videoprozessors, 
auch CRTC (Cathode Ray Tube Con- 
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eirvalne Loltuig 


Schenuiiisclicr Aufhüu des CPC 


vom Adressbus 


vom Dcrtortous 



zum irrtemen FloppylaufweiV 
Zwo'rttaufwerk 


Schema der l-'loppy-Elektronik 


troller) genannl, besteht darin, den 
Bildaufbau zu organisieren. Er legt 
fest, an welcher Stelle der Border, also 
der Bildschinnrand, und wo die Bildin¬ 
formation dargestellt wird. 

Für die Ein- und Ausgabe paralleler 
Daten und einzelner Bits innerhalb des 
Gerätes ist der PIO-Baustein zuständig. 
Er bildet die Steuersignale für den 
Soundchip und übermittelt diesem 
auch die für ihn bestimmten Daten. Die 
einzige Verbindung mit der Außenwelt 
hat die PIO über das Kassetten-Interfa- 
ee, mit dem sie über zwei Leitungen se¬ 
rielle Daten austauscht. 

Kommunikation ist 
wichtig 

Neben der Erzeugung von Tönen hat 
der Soundchip, wie fast alle Bausteine, 
noch eine weitere Aufgabe. Mil ihm 
werden die Daten aus der Tastaturma¬ 
trix gelesen. Er übernimmt damit einen 
Teil der für einen Rechner wichtigen 
Kommunikation mit der Umwelt. 

Im CPC 664 und 6128 sind zusätzlich 
noch zwei wichtige Bauteile unterge¬ 
bracht: der Floppycontroller und ein 
zusätzlicher ROM milden Routinen für 
die Arbeit mit Diskette. 

Nach der kurzen Erklärung der wich¬ 
tigsten Bauteile und deren Funktion 
nun zum Gerät selbst. Die folgenden 
Erklärungen beziehen wir auf den CPC 
6128. In leicht abgewandelter Form 
gelten diese aber auch für die beiden an¬ 
deren Typen 664 und464. 

Das Gehäuse des CPC besteht aus zwei 
Kunststoffschalen, die durch insge¬ 
samt neun Schrauben zusammengehal- 
ten werden. Werden diese entfernt 
(zwei Schrauben sind auf der Seite des 
Laufwerks), kann der CPC geöffnet 


werden. Zuvor sollte das Gerät aber 
wieder in seine normale Lage gebracht 
werden. Anschließend wird die obere 
Halbschale, in der die Tastatur einge¬ 
baut ist, vorsichtig abgehoben. Auf¬ 
grund der Leitungsverbindungen kann 
diese nun rechts neben dem Gerät ab- 
gelgtwerden. 

Nun kann man schon einmal einen er¬ 
sten Blick in den Computer werfen. 
Ganz rechts sicht man das Floppylauf- 
werk (beim 464 natürlich nicht). Fast 
den gesamten restlichen Platz nimmt 
die unter einem Abschirmblech befind¬ 
liche Computerplatine ein. Dieses Ab¬ 
schirmblech sollte man nur im Bedarfs¬ 
fall abnehmen, die vielen Schrauben 
mit denen das Blech befestigt ist, sind 
oftmals an recht unzugänglichen Stel¬ 
len. Die Schrauben bekommt man zwar 
ohne Probleme heraus, man hat aber 
beim Zusammenbau erhebliche Pro¬ 
bleme, sie wieder an der richtigen Stel¬ 
le zu plazieren. 

Geduld ist wichtig 

Die meisten Schwierigkeiten wird si¬ 
cherlich das Laufwerk bereiten. Da es 
ein mechanisches Bauteil ist, unterliegt 
es dem größten Verschleiß. Im Laufe 
der Zeit nehmen dann die Übertra- 
gungsfehler zu. Oftmals bringt da eine 
Reinigung des Schreib-Lesc-Kopfes 
schon Abhilfe. Man benutzt dabei am 
besten ein Waltestäbchen mit Spiritus. 
Ein anderes Lösungsmittel sollte auf 
keinen Fall benutzt werden, da anson¬ 
sten der Kopf angegriffen werden 
könnte. Der Kopf ist leicht zu finden. 
B licken Sie von oben auf das Laufwerk, 
so befindet sich der Kopf etwa unten in 
der Mitte. Darüber befindet sich, durch 
eine Feder gehalten, das Gegenstück, 


das die Diskette an den Kopf drückt. 
Der Kopf ist meist rund, schwarz, und 
in der Mitte befindet sich ein helles 
Viereck. 

Sollte die Reinigung nicht helfen, so 
muß das Laufwerk ausgewechsclt wer¬ 
den. Das bereitet aber keinerlei Proble¬ 
me, da es, wenn man von der mechani¬ 
schen Halterung absieht, lediglich 
durch zwei Steckverbinder mit dem 
Computer verbunden ist. Wenn man si¬ 
cher ist, daß eventuelle Probleme mit 
dem CPC von einem defekten Lauf¬ 
werk herrühren, so kann man mit ein 
wenig handwerklichem Geschick die¬ 
sen Fehler selbst beheben. 

Laufwerk defekt? 

Eine weitere Fehlerquelle ist die Tasta¬ 
tur. Vor allem beim CPC 664 ist die un¬ 
ter den Tasten befindliche Kontaktfolie 
sehr anfällig. Haben Sie bei Ihrem CPC 
664 Taslalurprobleme, so behebt ein 
Austausch der Folie in fast allen Fällen 
den Fehler. 

Bei den anderen CPC-Typen lohnt es 
sich auch einmal die Verbindung von 
der Platine zur Tastatur zu übeiprüfen. 
Vielleicht hilft schon eine vorsichtige 
Reinigung der Kontaktflächen am Ver¬ 
bindungsband. 

Sollte einmal eine Taste kaputt gehen 
so kann man diese auch Problemlos 
auslauschen(Hierbei ist der obere 
graue beschriftete Teil der Taste ge¬ 
meint). Die Tasten sind lediglich me¬ 
chanisch eingerastet. Für den Tasten¬ 
tausch gibt es im Fachhandel soge¬ 
nannte Taslenschlüssel, mit denen die 
Taste problemlos abgezogen werden 
kann. 

Sollte Ihr CPC etwas ernsthafter “er¬ 
krankt" sein, so kann man sich auch 
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schon einmal an die Leiterplatte wagen. 
Nun müssen Sie allerdings das Ab¬ 
schirmblech abbauen. Anschließend 
verbinden Sie Ihren Computer wieder 
mit dem Monitor und schalten alles ein. 
Die einfachste Möglichkeit der Fehler¬ 
suche ist, die Schaltkreise auf über¬ 
mäßige Erwärmung zu kontrollieren. 
Mit etwas Glück kann nach dem Aus¬ 
tausch des verdächtigen Bauteils der 
Fehler schon behoben sein. Im Extrem¬ 
fall kann es sein, daß nach dem Ein¬ 
schallen Rauchwölkchen aufsleigen. 
Merken Sie sich die Quelle, und schal¬ 
ten Sie den Computer so schnell wie 
möglich aus. 

ln einem solchen Fall ist der Fehler 
meist etwas kompl izierter. Die Ursache 
des übermäßig hohen Strom Busses 
kann unterschiedlichste Quellen ha¬ 
ben. denen man nur mit den richtigen 
Meßmitteln zu Leibe rücken kann. 

Kompliziertere Repara¬ 
turen sind Sache des 
Fachmanns 

Bevor man so richtig mit der Fehlersu¬ 
che loslegt, sollte man nicht vergessen, 
alle Leitungsverbindungen innerhalb 
und außerhalb des Gerätes zu überprü¬ 
fen. Wenn Sie einmal selbst Hand an 
Ihren CPC legen, sollten Sie mit äußer¬ 
ster Vorsicht Vorgehen. Achten Sie un¬ 
bedingt darauf, daß der Computer vor 
dem Aufschrauben ausgeschaliei i.st 
und alle Verbindungen zum Monitor 
beziehungsweise demNetzteil getrennt 
sind. 

JörgGurowski 


Pin 

Bezeichnung 

Erklärung 

1-5 

A11-AI5 

Adreßleitungen 

30- 

40 AO-AIÜ 

nur Ausgang, bei High-Poienlial (5 Volt) gilt die jeweilige Leitung als 
aktiv 

6 

Takt 

Eingangfürden Arbeitstakt 

7-10 D3-D6 

Ein* und Ausgang der Daten, bei High-Potential isldie jeweilige 

12- 

15 DO-LUD?) 

Leitungaktiv 

li 

vcc i 

Versorgungsspannung 5 Volt 

16 

INT 

Interrupt-Signal, Eingangssignal. Low-Aktiv (Auslösungbei 0-Voli- 

Pegel). kann bei Bedarf sofiwareraäßig gesperrt werden 

17 

NMl 

Interrupt-Signal, Eingangssignal. Low-Akliv, kann nicht gesperrt 
werden 

18 

HALT 

Ausgangssignal, befitidetsichdie CPU im Halt-Zusiand, ist diese 

Leitung auf Low-Pcgel 

19 

MREO 

Ausgangsleiuing.bei Lese-oderSchreibvorgüngenimSpeicher ist 
diese Leitung auf Low-Pegcl 

20 

rORQ 

Allsgangssignal, bei Lese- oder Schreibvorgängen jiut die Peripherie 
(DruokerpE)rt,Floppylaufw'erk oder ähnliches) ist diese Leitung auf 



Low-Pegel 

21 

RD 

Ausgangssignal, beim Lesen von Daten ist dieses Siganl aufLow 

22 

WR 

Ausgangssignal, beim Schreiben von Daten ist dieses Signal aufLow 

23 

BUSAK 

AusgaiigssignalÜbergibidieCPU die Bushoheit an cinenanderen 

Prozessor, geht dieses Signal auf Low-Pegel (kommt imCPC nicht zur 



Anwendung) 

24 

WAIT 

Eingangssignal, fürdie Dauercines Low-Pegels auf dieser Leitung 
geht der Prozessor in den Halt-Zustand, dies w'ird i m CPC dazu 



verwendet, die Arbeit des CRTC und derCPU zu synchronisieren 

25 

BUSRQ 

Eingangssignal, fürdie Dauer des Low-Pegels aufdieserLeitunggibl 
die CPU die Bu.shohcit ab (kommt im CPC nicht zur Anwendung) 

26 

RESET 

Eingangssignal. gehtdiesesSignalaufLow'-Pegel.wirdeinReset 

ausgelöst, die CPU wird in einen Standardzustand gebracht und 
beginnt mit der Abarbeitung eines Programm.s, weiches auf Adresse 0 



beginnt 

27 

Ml 

Ausgangssignal, dienihauptsächlich zur Synchronisation der 
Interruptbehandlung 

28 

RFSH 

Ausgangssignai, sorgt fürdie periodische Aul Frischung von 
dynamischenSpeicherbausteinen.isldieseLcitungaufLow-Pegel.so 

liegt auf dem Datenbus dieSpeicheradresse. die als nächstes 
aufgefrischt wird 

29 

GND 

Ver.sorgungsspannung 
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Programm 


Bonusprogramm: 

Schicht 

Berechnung von Schichtzulagen 

Jeder wartet auf ihn, den Zahltag. Aber stimmt dasaiich, waserrechnet wur¬ 
de? Vor allem bei Mehrschichtarbeit ist eine Kontrolle recht kompliziert. Un¬ 
ser ßonusprogramm hilft Ihnen dabei. 


Das hier beschriebene Programm dient 
zur Berechnung der Schichlzulage. Um 
die Bedienung einfach zu halten, wird 
die spezielle Anpassung im Programm 
vorgenommen. 

Folgende Werte eirechnet das Pro¬ 
gramm: 

- Früh-, Spät- und Nachtschichtzula- 
gen 

- Sonn- und Feiertagszuschläge 
-Schmutz- und Erschwerniszulagen 
-Urlaubs-ZKrankheitsmehrboiräge 
-Gesamtzulage und Gesamtbrutto 
-alle steuerfreien Zulagen. 

Die steuerfreien Beträge, die dem 
Schichtarbeiter das Herz höher schla¬ 
gen lassen, sind nach § 3 Einkommens¬ 
steuergesetz berechnet. Die im Pro¬ 
gramm verwendeten Zeiten: 
Frühschicht 5.45 bis 13.45 Uhr 
Nachtschicht 21.45 bis 5.45 Uhr 
Spätschichl 13.45 bis 21.45 Uhr 
An Sonntagen wird 12 Stunden gear¬ 
beitet. von 5.45 Uhr bis 17.45 Uhr und 
17.45 Uhr bis 5.45 Uhr. Nach dem Start 
des Programms erfolgt als erstes die 
Eingabe des Grundlohns (g). Nach ei¬ 
ner entsprechenden Abfrage wird bei 
Verheirateten der Variablen kl der Wert 
157,85 und bei vorhandenen Kindern 
der Variablen k2 der Wen 35 zugewie¬ 
sen. Die.se Zulagen sindgegebenenfalls 
anzupassen. 

Nun werden Sie nach dem “U-K Durch- 
schnitt”(Urlaub-Krank) gefragt. Falls 
Sie erkrankt waren oder Urlaub hatten, 
geben Sieden Jahreswert IhrerSchicht- 
zulage ein. Hieraus wird Ihr Urlaubs- 
beziehimgsweise Krankheitsmehrbe¬ 
trag berechnet. Weiter geht es mit “E-i-S 
Pauschale j/n”, das heißt, wenn Sie eine 
Schmutz- und Erschwcmispauschale 
bekommen, wird ep=149 DM. Glei¬ 
chermaßen verfahren Sie bei “Überzeit 
j/n”. Bei “j” werden zum Grundlohn 2,5 
Prozent als Überzeitzulage zugeschla¬ 
gen. Alle bis jetzt abgefragten Werte 
werden zum Grundlohn addiert. Bei der 


Eingabe der geleisteten Tage ist zu be¬ 
achten: Feiertage werden extra abge¬ 
fragt und müssen von den normalen Ta¬ 
gen abgezogen werden, das heißt, wenn 
Sie fünf Tage Frühschicht gearbeitet 
haben, und ein Feiertag war darin ent¬ 
halten, so geben Sie ein “Fruehschicht- 
tage Mo-Sa = 4”, der Feiertag wird spä¬ 
tereingegeben. 

Wenn man keine Pauschale erhält, wer¬ 
den nach der Tagesabfrage die “E+S 
Gruppen” eingegeben. Der DM-Wert 
dereinzelnenGruppcn wirdinderZeile 
1090 gesetzt, und ist bei Bedarf anzu¬ 
passen (el bise5). 

“Feiertage j/n”, die geldbringende Fra¬ 
ge. bringt Sie bei “j” später ins Feier- 
lag.smenü. Vorher erfolgt aber noch die 
Eingabe”U-K in Stunden”, falls Sie Ur¬ 
laub halten oder krank waren. Der De¬ 
zemberwird wegen seinervielen Feier¬ 
tage gesondert cingegeben. Wenn Sie 
einen Feiertag in der Frühschicht hal¬ 
ten, geben Sie “j” ein und bei den be¬ 
treffenden Tagen eine 1 oder 2. Bei 
Nacht- oder Spätschichl wird genauso 
verfahren. Das folgende Steuerpro¬ 
gramm ist mit dem aus Heft 6/7’91 
identisch. 

Nach der letzten Eingabe wird derkoni- 
pleite Bildschirm als Lolinzellel be¬ 
nutzt, und Sie können sehen, wofür Sie 
sich abgeplagt haben. Auf Wunsch 
kann dieser auch ausgedruckl werden. 
Rechnerisch läuft das Programm fol¬ 
gendermaßen ab: 

Für das gesamte Programm gilt Früh = 
f. Spät = s und Nacht = n. Nach der Ein¬ 
gabe des Grundlohnes (g) erfolgt die 
Tarifgrundlohnbcrechnung. das ist 
Grundlohn, geteilt durch die Anzahl 
der Tarifmonatsstunden (165). Der sich 
ergebende Wert tg ist die Grundlage für 
die Zulagen. Die Werte tl, t2 und t3 
werden nun ermittelt. Das sind 5 Pro¬ 
zent, 42 Prozent und 55 Prozent Zu¬ 
schläge. tl gilt für die Zeit von 6 bis 20 
Uhr, wenn keine andere Zulage ge¬ 


währt wird. t2 für die Zeit von 20 bis 6 
Uhr, und t3 gibt es für den Sonntag. 
Diese Werte sind gegebenenfalls anzu¬ 
passen. In der Zeile 1090 sind die Werte 
für die E+S-Gruppen (el bise5) feslge- 
legt. Dann wird der U-K ermittelt, in¬ 
dem der eingegebene J ahreswert durch 
12 und die Monatsstunden geteilt wird. 
Die Überzeit- und Sclimutzpauschale 
wird im Urlaub natürlich abgezogen, ln 
der Zeile 1270 wird die fünfprozentige 
Schichtzulage (zO) errechnet, das heißt, 
in der Frühschicht (5.45 bis 13.45 Uhr) 
sind das 7.75 Stunden. In der Spät¬ 
schicht sind dies 6,25 Stunden, 
ln der nächsten Zeile wird der .steuerli¬ 
che Grundlühn (sg) berechnet. Dieser 
stellt die Grundlage zur steuerfreien 
Zulage dar. Der Stundenlohn wird be¬ 
rechnet. indem der Grundlohn plus alle 
Zuschläge, ausgenommen die Sonn- 
und Feiertagszulagen, durch die Stun¬ 
den des Monats geteilt wird. Dann wer¬ 
den die Werte für die Variablen s2 biss5 
errechnet. Dies sind die steuerfreien 
Zuschläge von 25, 50. 75 und 90 Pro¬ 
zent. Dies hat den Vorteil, daß nach der 
Schichttage-Eingabe nur noch mit ei¬ 
ner t-Variablen für die steuerpllichtige 
Zulage und für die steuerfreie Zulage 
miteincrs-Variablen multipliziert wer¬ 
denmuß. 

Nun werden noch die Werte s und t ver¬ 
glichen, um zu verhindern, daß die 
steuerfreie Zulage nicht größer als die 
eigentliche Zulage wird, denn 50 Pro¬ 
zent von sg können mehr sein als 55 
Prozent von lg. ln der Variablen x wer¬ 
den alle Tage addiert, in der es 42 Pro¬ 
zent für acht Stunden gibt. Die Variable 
y zählt alle Tage mit 9,75 Stunden (42 
Prozent: an Sonn- und Feiertagen). Der 
Wert in ny gibt alle Frühschichttage mit 
42 Prozent (von 5.45 bis 6.00, also 0,25 
Stunden) und alle Spätschichttage mit 
42 Prozent (von 20.00 bis 21.45, also 
1,75 Stunden) an. In der so-Variablen 
sind alle Tage mit Sonntagszuschlägen 
gespeichert. Die Nachtzuschläge sind 
unter der Variablen nz gesammelt. Die 
Gesamtzulage (gz), Steuerfreizulage 
(gO und das Gesamtbrutto (gb) werden 
errechnet, bevor es in das Steuerpro¬ 
gramm gehl. In der Zeile 2790 ist ein 
Krankenversicherungsanteil von 4.55 
Prozent festgelegl. und in Zeile 2990 
sind es 8 Prozent Kirchensteuer. Diese 
Werte sind gleichfalls an die persönli¬ 
chen Gegebenheiten anzupassen. 

Heinz-Jürgen Reinstädler/jg 
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Teamwork im CPC 

Der VideocontroUer und das 
Gate-Array im CPC 

Der VideocontroUer und das Gate-Array sind die Bauteile im CPC, von denen 
wenig bekannt ist. Durch Änderung von Werten in deren Registern sind aber 
äußerst interessante Effekte zu erzielen. vSu ist es beispielsweise möglich, Bil¬ 
der über den gesamten Bildschirm hinweg darzustcllen. 


Der Videocontroller und das Gate-Ar¬ 
ray warten schon seil 1984 geduldig, 
daß man ihnen die Last ihrer großen 
Geheimnisse von den zanen Draht¬ 
füßchen nehme. Ersterer wurde höch¬ 
stens einmal zum Umschallen in den 
6()-Hertz-Modus mit einem OUT-Be- 
fehl beehrt. Das Gate-Array dürfte be¬ 
stenfalls als Zwischenhändler bei der 
schnellen BANK-Umschaltung ge¬ 
dient haben. Im Jahre 9 der CPC-Zeit- 
rechnung ist eine Enthüllung dieser un¬ 
geahnten Fähigkeiten, denen ein Groß¬ 
teil der 16-Bil- und 32-Bit-Computer 
auch heule nichts Vergleichbares ent¬ 
gegenzusetzen hat, schon längst über¬ 
fällig. 

All jene, die bei Schlagworten wie 
“Uardwarenahe Assembler-Program¬ 
mierung” lieber weilerblättern, sei hier 
gesagt: Verdrängt einmal für zehn Mi¬ 
nuten Eure Ängste, und laßt Euch von 
den folgenden Seilen überraschen. 

Wer sich aktiv an der Reise durch den 
CPC beteiligen möchte, sollte über 
Grundkenntnisse der Maschinenspra¬ 


che verfügen. Doch auch für alle ande¬ 
ren werden sich viele effektvolle Tricks 
zum Einbau in B ASIC-Programme fin¬ 
den. 

Der Schwerpunkt der folgenden Seiten 
liegt auf dem Grundversländnis der 
Vorgänge im Videocontroller und im 
Gate-Array. denn für hardwarenahes 
Programmieren ist das Wissen um das 
Innenleben dieser CPC-Baustcine un¬ 
erläßlich. Den, der sich tapfer durch die 
Theorie geschlagen hat, erwartet ein 
mundgerecht zubereiteter Happen Pra¬ 
xis. 

Beginnen wirmit dem VideocontroUer. 
Zur Einstimmung empfehlen wir einen 
Blick auf die Auflistung aller CRTC- 
Register. Nach dem Einschalten sind 
die Register leer, der B ildschirm ist also 
dunkel. Der Prozessor beginnt seine 
Arbeit im ROM. und eine seiner ersten 
Tätigkeiten ist das Füllen sämtlicher 
CRTC-Register. (Besitzer eines Disas¬ 
semblers können den Weg ab Adresse 0 
im LOWER ROM verfolgen.) Vorher 
testet er noch das Vorhandensein einer 


Lötbrücke, um den CRTC gegebenen¬ 
falls mit den Daten für den 60-Hertz- 
Modus zu füttern. Ein Listing zum Um- 
schalten in den 60-Heitz-Modus finden 
Sie Inder Lislingbox. 

DerCRTC 6845(XX)von Motorolube- 
findel sich schon seit Urzeiten am 
Markt und hat eine Verbreitung gefun¬ 
den, die für einen Spezialchip einzigar¬ 
tig ist. So hat er zum Beispiel in den 
MDA-. Hercules- und CGA-Karten der 
PCs seinen festen Platz. Insgesamt bie¬ 
tet er vier Darstellungsmodi: 

1) Texlmodus mit 80*25 Zeichen und 
freidefinierbarem Hardware-Cursor. 

2) Grafikmodus 0 (160*200 Punkte. 
16Farben), 

3) Grafikmodus 1 (320*200 Punkte, 
vier Farben), 

4) Grafikmodus 2 (640*200 Punkte, 
zwei Farben). 

Auf den PCs der ersten Tage fand nur 
der Texlmodus Verwendung, vor allem 
wegen der damals noch sehr hohen 
Preise für RAM-Bausteine. Die PCs 
halten damals, wie unser CPC, 64 
kByte Speicher. Von MBytes wagte 
man noch nicht einmal zu träumen. Im 
Textmodus verbraucht Jedes Zeichen 
gerade zwei Bytes (ASCH und Farbin¬ 
formation). das sind bei 80*25 Zeichen 
nicht einmal 4 kByte Bildschirmspei- 
cher. Da galten die Grafikmodi 0 bis 2 
mit ihren satten 16 kByte Video-RAM 
als Luxus. 

Grafik - früher einmal 
ein Luxus 

Und eben dieser Textmodus wurde von 
den Entwickleni des CPC nicht berück¬ 
sichtigt, so daß die Z8()A-CPU weiter¬ 
hin jedes Zeichen auf unserem Bild- 
schinn pixelweise aulbauen muß. Da 
sich ein Hardware-Cursor aber nur im 
Textmodus darstellen läßt, kann man 
die Register 10,11, Hund 15 als Relikt 
aus derPC-Well getrost vergessen. 
Dank Amslrads Preisbewußtsein ist 
jetzt also der aufgrund seiner weiten 
Verbreitung billigste CRTC für den vi¬ 
suellen Kontakt mit dem CPC zustän¬ 
dig. Und weil Amstrads Einkäufernoch 
nie besonders wählerisch waren, haben 
sie auch gleich über zehn verschiedene 
Typen des CRTC 6845 für die CPCs be¬ 
sorgt. Deren kleine Unterschiede wer¬ 
den uns noch mit einigen zusätzlichen 
Problemen belasten. Glücklicherweise 
sind diese Differenzen oft so minimal, 
daß sich die zehn Typen auf drei Haupt¬ 
vertreter zurückführen lassen. Im fol¬ 
genden werden wir diese mit Typ 0 bis 2 
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Portadresseii: &BCXX (Auswahl), &BDXX (Schreiben), &BFXX (Lesen) 

Reg. 

Inhalt 

Funktion 

0 

63 

Gesamtbreite des Bildschirms inklusive Border und horizontaler Rücklauf 


40 

Zahl derZeichen/21eile {Wortmodus, d.h. 40 für 80 Bytes) 

2 

46 

Beginn de.s horizontalen Rücklaufs (6 Zeichen nach rechtem Rand) 

3 

142 

Feineinstellung des horizontalen Rücklaufs 

4 

38 

Gesamthöhedes Bildschirms inklusive Border und vertikaler Rücklauf 

5 

0 

Feineinstellung derGcsamthöhe in Pixelzeilen 

6 

25 

Zahl der angezeigien Text/,ei len 

7 

30 

Beginn des vertikalen Rücklaufs (5 Texlzeilennach dem unteren Rand) 

8 

0 

Interlace-Modus (25 Hz Bildwiederholfrequenz, 2*Autlösung) 

9 

7 

ZahlderPixelzeilen-l proTextzeile 

10 

0 

Aussehen desniehtexisienien Hardware-Cursors 

11 

0 

Aussehen desnichtexistentenfku'dware-Cursors 

12 

48 

Startadresso Bildschirmspeicher (HIGH=ßit 8-13) 

13 

0 

Slartadresse Bildschirmspeicher (LOW=Bit 0-7) 

14 

0 

Position des nichtexisienten Hardware-Cursors (HIGH) 

15 

0 

Position de.s nichtexisienten Hardware-Cursors (LOW) 

16 

?? 

Bildschirmadresse, bei der Lighlpen-lmpuls auftraf (HIGH) 

17 

?? 

Bildschirniadresse, bei der Lightpen-impuls auftraf (LOW) 


bezeichnen, wobei Typ 0 am besten für 
Tricks jeder Art geeignet ist und Typ 2 
oft ziemlich böse reagiert. 

Jetzt wäre es für Jeden an der Zeit zu er¬ 
fahren, welcher CRTC sich eigentlich 
in seinem eigenen CPC befindet. 
Lösung l: Aufschrauben. Staub absau¬ 
gen und Typenbezeichnung entziffern: 
6845 SP = Typ 0,6845 R = Typ 1,6845 
P=Typ2. 

Lösung 2: Listing 2 ablippeti und star¬ 
ten. Diesen CRTC-Test haben wir der 
französischen Demogruppe “LOGON 
SYSTEM” zu verdanken, die sich wohl 
einige Nächte mit öden Zeit- und Regi- 
stervergleichcn um die Ohren geschla¬ 
gen haben muß. 

Jetzt gilt es noch die Frage zu klären, 
wie man ein Register mit einem be¬ 
stimmten Wert lädt. Der Z80-Prozessor 
tritt mit den Hardwarekomponenten 
Uber die 1/0-Kanäle (INPUT/OUT- 
PUT-Kanäle) in Verbindung. Diese 
kann man sich als Schläuche von der 
CPU zum jeweiligen Gerät vorstellen, 
in die man mit OUT Daten hinein¬ 
schicken und mit IN (INP in BASIC) 
herauslesen kann. Jetzt könnte man 
natürlich 18 Schläuche zu den einzel¬ 
nen CRTC-Regisiem verlegen, was 
aber in einem teuren und komplizierten 
Schlauchsalat enden würde. 

I/O-Kanäle und 
Schlauchsalat 

Man verwendet daher in der Praxis nur 
drei Leitungen, wobei man über Lei¬ 
tung 1 {&BC00) ein CRTC-Regisler 
auswählt, über Leitung 2 (&.BDOO) ei¬ 
nen Wert hineinschreibt und über Lei¬ 
tung 3 (&BF00) den Inhalt eines Regi¬ 
sters abfragt. Dieses Abfragen ist mit 
Vorsichtzu genießen. Bei CRTC-Typ 0 
funktioniert es immerhin noch bei den 


Die Register des CRTC 6845 

Registern 12, 13, 16 und 17, während 
CRTC-Typ 2 nur bei 16 und 17 Werte 
ausspuckt. In der Praxis sieht das dann 
so aus: 

10 OUT &BC00, zu ladendes 
Register 0-13) 

20 OUT &BD00,Wert (0-255) 

Wichtig ist, daß es sich bei &BC00 bis 
&BF00 um Pseudo-16-Bit-Adressen 
handelt, im Gegensatz zu echten 16- 
Bit-I/O-Adressen. Um Register 1 auf 
den Wert 9 zu setzen, gibt man ein: 

OUT SBCOO, 1: OUT 4BD00,9 

Das gleiche Ergebnis erzielt man aber 
auch mit: 

OUT &BC28, l:OUT &BDAE, 9 


Es kommt also nur auf das HIGHBYTE 
(= &BC,&BD) an. ln A.ssembler wird 
die Sache schon etwas komplizierter, 
gibt es doch drei verschiedene OUT- 
Befehle: “OUT (XX),A”, “OUT 
(C),Reg” sowie die Blockbefehle “OU- 
TI”, “OTIR”, “OUTD” und “OTDR”. 
Grundsätzlich steht in der Klammer die 
anzusprechende Portadresse und da¬ 
nach das CPU-Register, dessen Wert an 
eben diese I/O-Adresse geschickt wer¬ 
den soll. 

Bei der Nutzung der IN- beziehungs¬ 
weise OUT-Befehle sollte folgendes 
beachtet werden: 

1) Der Befehl “OUT (XX),A” funk¬ 
tioniert nur bei 8-Bit-Portadressen zu 
denen &BCXX-&BFXX wohl nicht 
gehört. Fazit: In Verbindung mit dem 
CRTC schnellstens vergessen. 

2) Der Befehl “OUT (C),Reg” krankt 
an seiner mißverständlichen Mnemo- 
nic (Name des Befehls), wird doch 
das C-Register nur bei “echten” 16- 
Bit-Adressen (beispielsweise Disket- 
lenconlroller &FB7E+&FB7F) zur 
Adressierung herangezogen. Sonst 
enthält es meistens sogar den Wert, 
der ausgegeben werden soll. Die 
komplette Verwirrung schafft da be¬ 
sonders der Befehl “OUT (C),C”, un¬ 
ter dem sich Anfänger selten etwas 
Konkretes vorstellen können. Zum 
besseren Verständnis empfehlen wir, 
das C vor dem geistigen Auge durch 
ein BC zu ersetzen. Um wie oben Re¬ 
gister 1 auf 9 zu setzen, könnte man 
schreiben: 





Die Rasterhalken. eine 
der ällesien Errungen¬ 
schaften der Demopro¬ 
grammierung 
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LD A,1 
LD BC,&BC00 
OUT (BC ),A 
LD A, 9 
LD BC,&BD00 
OUT (BC) ,A 

So wäre es wohl jedem verständlich, 
nur dem Assembler leider nicht. Der 
beharrt auf besagtem “(C)”, und weil 
obige Methode langsam und speicher¬ 
platzfressend ist, benutzen wir eine 
kürzere und damit schnellere Methode. 
(Wie bei BASIC gesehen, ist der Wert 
des C-Registers oder LOWBYTES bei 
der Adressierung unerheblich.) 

LD BC,6BC01 
OUT (C) ,C 
LD BC,&BD09 
OUT (C) ,C 

3) Die BIockout-Befehle OTIR und 
OTDR kann man wegen der bei Poit- 
adressen sinnlosen Wiederholung 
gleich abschreiben, bleiben noch OUTI 
und OUTD, mit denen absolute Ge¬ 
schwindigkeitsfanatiker noch ein paar 
Mikrosekunden bei längeren OUT- 
Ketten herausschinden können. Da wir 
sie aber in Verbindung mit dem Gate- 
Array brauchen, seien sie erwähnt. OU¬ 
TI läßt sich am einfachsten so beschrei¬ 
ben: 

LD A, (HL) 

DEC B 
OUT (C) ,Ä 
INC HL 

Für OUTD gi It analog: 

LDA, (HL) 


DECB 
OUT (C) ,A 
DEC HL 

Ihnen wird schon aufgefallen sein: Das 
“DEC B” steht vor dem eigentlichen 
Befehl OUT; ein Umstand, der vielen 
unbekannt sein dürfte. (Werden Befehl 
OUTI schon einmal zusammen mit 
dem Gate-Array verwendete, hat seine 
Daten unbewußt über Adresse &7E ge¬ 
schickt, was glücklicherweise aber 
auch funktioniert.) 

Auf das obige Beispiel angewandt: 

LD HL,DATA 

LDB,SiBD 

OUTI 

LD B,&BE 

OUTI 

RET 

DATA: DB 1, 9 


triebssystems ins RAM kopieren'. Ein- , 
schaltmeldung ausgeben. Bildschirm- ; 

modus initialisieren undso weiter). i 

Der CRTC wurde also endlich mit der ! 
oben besprochenen Methode “OUT 
(C),Reg” gefüttert und beginnt nun so- ' 
fort mit der Darstellung des Bildes, des¬ 
sen Daten er direkt aus dem standard¬ 
mäßig 16 kByte großen Bildschirm¬ 
speicher holt. Dieser liegt beim CPC 
normalerwei.se im Bereich &CÜOO bis 
&FFFF. Intern verwaltet der CRTC 
mehrere Zähler, auf die man leider kei¬ 
nen Zugriff hat, die er aber ständig mit 
den Werten in seinen Registern ver¬ 
gleicht, wobei er bei Übereinstimmung 
eine bestimmte Aktion ausführt. Man 
kann also durch die Register indirekten 
Einfluß auf die Abläufe im CRTC neh¬ 
men. 

Bitte “BORDER 26” eingeben, wir fol¬ 
gen Jetzt dem Elektronenstrahl auf sei¬ 
nem Weg zum Monitor, wobei wir in 
der linken oberen Ecke des sichtbaren 
Bildschirmausschnittes beginnen (wo 
BORDER in PAPER übergeht.) Genau 
an diesem Punkt setzt der CRTC fol¬ 
gende interne Zähler auf 0: I 

1) den Textzeilenzähler. 

2) den Pixelzeilenzähler und 

3) denZcichenzähler. i 

Des weiteren kopiert er den Inhalt der 
Register 12 und 13, die ja die Start- | 
adresse des Bildschirmspeichers in 
leicht veränderter Form enthalten, in | 
einen “Pointer”, der ständig aktuali- | 
siert wird und so immerauf die Adresse 1 

zeigt, aus der der CRTC seine Daten ! 
nimmt. Warum Register 11 nicht &C0, I 
sondern &30 enthält, obwohl der Bild- I 
schirmspeicher bei &C()00 beginnt, ist , 
aus der Abbildung ersichtlich. 

Der CRTC beginnt also mit der Darstel- ; 

lung der ersten Pixelzeile, wobei er im 
Worlmodus arbeitet, also immer zwei j 


Nun zurück zur CPU, die noch immer 
im ROM beschäftigt ist (Teile des Be- 
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Bytes auf einmal aus dem Speicher liest 
(und den Pointer auch um 2 erhöht) und 
in die Bildinlörmation umwandell. 
Dann vermindert er den Zeichen/ähler 
um 1. Jetzt ist die Zeit für einen ersten 
Registervergleich gekommen. Ist der 
Stand des Zeichenzählers gleich dem 
Inhalt von 

- Register 1 (Anzahl Zeichen/Zeile), so 
wird das Auslesen aus dem Video- 
RAM beendet und für den Rest der Zei¬ 
le der BORDER gezeichnet; 

- Register 2 (Beginn des horizontalen 
Rücklaufs), wird der Elektronenstrahl 
dunkelgeschaltet und vom rechten 
Bildschirmrand an den Anfang der 
nächsten Pixelzeile am linken Rand ge¬ 
führt. Hat er diesen erreicht, wird wie¬ 
der die Farbe des BOR DERS erzeugt; 

- Register 0 (Gesamtbreite des Bild¬ 
schirms inklusive BORDER und hori¬ 
zontalem StrahlrücklauO. so ist die 
Au.sgabe einer Pixelzeile beendet, und 
derCRTC führt folgende Aktionen aus: 

a) Der Zeichenzähler wird wieder auf 0 
gesetzt. 

b) Der Pixelzeilenzähler wird um 1 er¬ 
höht und mit dem Inhalt von Register 9 
(Pixelzeilen -1 pro Textzeile) vergli¬ 
chen. Stimmen beide überein, wird der 
Pixelzeilenzähler mit 0 geladen, aber 
dafürderTextzeilenzählerum 1 erhöht. 

c) Die Änderung des Pixelzeilenzählers 
wird im “Pointer” berücksichtigt. 

Register werden 
abgefragt 

Die gleichen Abfragen wie oben für 
den horizontalen Zeichenzähler nun 
auch für den vertikalen Textzeilen¬ 
zähler. Ist der Wert des Textzeilen¬ 
zählers gleichdem Inhalt von 

- Register 6 (Anzahl der dargestellten 
Textzeilen (25)), wird das Auslesen aus 
dem Video-RAM für diesen Bildauf¬ 
bau beendet und nur noch der BOR¬ 
DER angezeigt; 

-Regi.ster? (Start des vertikalen Rück¬ 
laufs), so wird der Elekironenstrahl 
wiederdunkelgeschaltet und von rechts 
unten nach links oben quer über den 
Bildschirm zurückbewegt; 

- Register 4 (Gesamthöhe des Bild¬ 
schirms inklusive BORDER und verti¬ 
kalem Strahlrücklauf), beschäftigt sich 
der CRTC wieder mit dem Zurückset¬ 
zen sämtlicher Register und dem Neu¬ 
laden des Pointers. Die unendliche Ge¬ 
schichte hat begonnen... 

Zur Entspannung empfehlen wir, mit 
den gutmütigen Registern 1 und 6 zu 
experimentieren. Wer obiges Sezieren 


des CRTCs verstanden hat, sollte auch 
in der Lage sein, den Grund der verwir¬ 
renden Bildverschiebung bei Ände¬ 
rung von Register lzu erkennen. 

Von den Registern des CRTC nun zum 
Gate-Array, das den CRTC mit den für 
den Bildaufbau nötigen Farbdalen ver¬ 
sorgt. Wie der Name schon andeutet: 
ein wichtiges Tor zur Hardwarewelt des 
CPC. Insgesamt verfügt das Gate-Ar¬ 
ray über vier Register, die über beliebi¬ 
ge Portadressen von &40 bis &7F er¬ 
reichbar sind. Bei Werten unter &7E 
fühlt sich der Floppycontroller ange¬ 
sprochen, deshalb sollte man trotzdem 
nach dem Befehl OUTI ein “INC B” 
setzen. Im Gegensatz zum CRTC 
schickt man aber nicht den Index (Regi¬ 
sterauswahl) unddeneigentlichen Wert 
getrennt, sondern in einem einzigen 
Byte vereinigt. Bit 6 und 7 legen dabei 
das gewünschte der vier Register fest, 
Bit 0 bis 5 enthalten den zu sendenden 
Werl. Die einzelnen Funktionen sind 
aus der Abbildung der Gate-Array-Re- 
gisierersichtlich. 

Von Pixeln und Farben 

Wir werden das Gate-Array zum 
schnellen Ändern von Bildschirmfar¬ 
ben verwenden, da die Systemroutinen 
(&BC32 und so weiter) für komplexe 
Farbeffekte absolut ungeeignet sind. 
Um beispielsweise den BASIC-Befehl 
“INK 0,6” direkt über das Gate-Array 
auszuführen, benötigt man zwei OUT- 
Befehlc. 

Zuerst wird Register 0 mit der Pen- 
Nummer (= 0) geladen, dann Register 1 
mit der Farbe (=6). 

Nun nehmen wir die letzte Hürde: Das 
Betriebssystem versetzt uns vorsätz¬ 
lich in die Scheinwelt einer nach der 


Hell igkeit am Grünmonitor geordneten 
Farbpalette. Die Hardware verwendet 
allerdings ein anderes Codierungssy¬ 
stem. Ein Blick in die Tabelle offenbart: 
Der Farbe 6 (Hellrot) entspricht die 
Nummer 12. Man schreibt also: 

OUT &7F00,0 

(Register 0, Wert 0) 

OUT &7F00,&4C 

(Register 1,das heißtBit6=l, Wert 12) 
Ein kurzes Aufflackern von INK 0 be¬ 
stätigt: Es hat funktioniert! Allerdings 
maximal nur 1/50 Sekunde, denn beim 
nächsten vertikalen Strahlrücklauf 
(VSR) setzt das Betriebssystem wieder 
die alten Farben. In Assembler geht 
man so vor: 

DI /Betriebssystem aus# Farbe 
bleibt 
LD BC,&7F00 
OUT (C) ,C 
LD C,&4C 

OUT (C) ,C /Farbe setzen 
LOOP: JP LOOP /Endlosschleife 

Zum Abschluß noch ein kurzer Blick 
auf den Portbaustein 8255, ähnlich wie 
das Gate-Array ein “Mädchen für alles” 
ist, ist er für Soundchip, Tastaturabfra¬ 
ge, Kassettenrekorder und Weiterlei¬ 
tung verschiedener Signale zuständig. 
Eine Übersicht der verwirrenden Funk¬ 
tionen würde diesen Rahmen sprengen, 
zumal wir nur an einem einzigen Bit in¬ 
teressiert sind: dem VSync-Signal. Der 
CRTC besitzt nämlich die angenehme 
Eigenschaft, bei jedem horizontalen 
und vertikalen Strahlrücklauf ein Syn¬ 
chronisationssignal auszugeben..Ersie- 
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res ließen die CPC-Entwickler scham¬ 
los auf der Platine versickern, das 
VSync-Signal (vertikale Synchronisa¬ 
tion) wurde aber dankenswerterweise 
an besagten Baustein 8255 weitergelei¬ 
tet, wo es sich ständig über Bit 0 der 
Portadresse &F5 abfragen läßt. 

Das VSync-Signal am 
Parallelbaustein 

Wegen der notwendigen Geschwindig¬ 
keit, bedingt durch die kurze Dauer des 
vertikalen Rücklaufs, funktioniert eine 
Abfrage nur in Assembler, unter BA¬ 
SIC verwendet man CALL &BD19 
oder den Befehl FRAME (664/6128), 
die beide die nun folgende Routine im 
ROMaufrufen: 

LD B,&F5 

LOOP INA, (C) 


RRCA 


JR NC,LOOP 


;Portadresse 
laden 

;WieOUT (C) ,A- 
nur INput statt 
OUTput über &F5 
;Bit 0 des emp¬ 
fangenen Wertes 
ins Carry-Flag 
;War es 0, dann 
noch kein verti¬ 
kaler Strahl¬ 
rücklauf - wei¬ 
ter warten. 


Und damit wäre sie auch endlich ge¬ 
schafft - die Theorie. Jetzt erwartet uns 
ein Sprung in die wogenden Gewässer 
der Praxis, was manchen rauchenden 
Köpfen vielleicht die ersehnte Abküh¬ 
lungbringen wird. 

Mittlerweile gibt es eine Vielzahl von 
“Special Effects”, die wir hier unmög¬ 
lich alle bis ins kleinste Detail durch¬ 
leuchten können. Vielmehr sollte jeder, 


Bedingt durch diverse Warlezyklen, sollten diese Schleifen rein rechnerisch trotzdem 
nur 62 ms (Millisekunden) dauern, was allerdings wieder von der Anzahl der OUT-Be- 

fehle abhängl. Es empfiehlt sich,rait Werten von 61 bis 64 zu experimentieren. 

LD HL, TABELLE 

;Farbdaten 

LD A,100 

»•Anzahl Durchläufe 

LD BC,&7F00 

; Portadresse Gate Array 

OUT {C),C 

;PEK 0 anwählen 

LOP: LDC, (HL) 

;1,75 ms 

OUT (C) ,C 

; 4.00 ms (durch Wartezyklen) 

INC HL 

;1.50 ms 

LDR,A 

; 2.25 ms sinnlose Verzögerung 

DS 49 

/49.0 ms sinnlose Verzögerung (49 NOPs ä 1 ms) 

DEC A 

;1.00 ms 

JPNZ,LOP 

;2.50 ms 


62.00 ms 

RET TABELLE: 

DB &54,&4B,&59,&5A,&53,.(lOOx) 


ßeispieJ für eine typische M-MiUisekunden-Svhleife 


den der “Forscherdrang” gepackt hat, 
mit den nun folgenden Informationen 
gerüstet, in der Lage sein, die Feinhei¬ 
ten selbst zu entdecken. 

Beginnen wir mit den Rasterbalkcn. Ei¬ 
ne der ältesten Errungenschaften der 
neuzeitlichen Demoprogrammierung 
wurde bereits um 1987 entdeckt. Fast 
allen dürften die wandernden Farbbal¬ 
ken bekannt sein, die auch Mode-2- 
Programme in ungeahnter Farben¬ 
pracht erstrahlen lassen. 

Der Name Raster gehl auf den Begriff 
Rasterzeile zurück, was eigentlich Pi¬ 
xelzeile bedeutet. Die Idee: Während 
der Elektronenstrahl von oben nach un¬ 
ten über den Bildschirm rast, ändert 
man über das Gate-Array in dem Mo¬ 
ment, wenn er von rechts nach links 
zurückgelenki wird, ein bis zwei Far¬ 
ben. Im Speicher befindet sich dann ei¬ 


ne Tabelle, die für Jede Pixelzeile einen 
Farbwert enthält. Bei 200 Pixelzeilcn 
wären so auch in Mode 2 200 Farben 
möglich. Der CPC kennt derer aber nur 
27, womit die maximale Farbanzahl 
festgelegt ist. 

Volle Farbenpracht 
auch in Mode 2 

Das Besondere besteht nun darin, daß 
man in besagter Tabelle nach jedem 
Bildschirmaufbau mit dem Befehl 
“LDIR” Bereiche verschiebt, neu auf- 
baut und so weiter. Hier sind nur durch 
die Phantasie des Programmierers 
Grenzen gesetzt. 

Das Problem: Wie erkennen wir. daß 
der Elektronenstrahl gerade nach links 
zur nächsten Pixelzeile zurückgleitet 
wird und daß es daher an der Zeit wäre, 
wieder eine Farbänderung vorzuneh- 



BiUlung der effektiven 
Video-RAM-Adresse 
(Pointer) 


men? 

Das vom CRTC zu diesem Zwecke ge¬ 
nerierte HSync-Signal (horizontale 
Synchronisation) fällt aus oben nach¬ 
zulesendem Grunde aus. Die Antwort: 
Man agiert blind und vertraut darauf, 
daß eine Pixelzeile (auch Horizon- 
talzyklus genannt), wie in Register 0 
festgelegt, 64 (0 bis 63) Zeichen (davon 
24Border) breit ist. 

Der CRTC arbeitet mit einer Taktfre¬ 
quenz von 1 MHz, ein Zyklus dauert al¬ 
so eine Mikrosekunde. Für den Aufbau 
einer Pixelzeile benötigt der CRTC 64 
Taktzyklen (64 Mikrosekunden). Be¬ 
dingt durch den Wortmodus liest er in 
dieser Zeit 128 Byte aus dem Bild¬ 
schirmspeicher. Mil diesem Wissen ge- 
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Portadresse &7r (&40 - &7F ist möglich) 

Bit 7 6 5 4 3 2 1 0 

iliiii 

Übertragener Wert (Bit 0-5) 

Registeraaswahl (Bit 6-7) 

Register 0:{OOOXXXXX) PENnummer wähien (0-15,16 = Bofder) 

Register 1; (OtOXXXXX) Gewählten PEN mit Farbe X füllen 
Register 2: (1 OOXXX)(X) Muitilunktionsregister 

->00; Bildschirmmodus 0 (160 • 200) 

->01: Bildschirmmodus 1 (320 ‘ 200) 

->10: Bifdschirmmodus 2 (640 * 200) 

->11: Eigentlich Textmodus, am CPC sinnlos 
-»0/1; unteren ROM (0 • &3FFF) ein/ausblenden 
->0/1; oberere ROM (ÄCOOO ■ &FFFF) ein/aa£i>lenden 


»0/1:lnt6rruplzahler löschen nein/ja 
(nur bei Screensplitting von Bedeutung) 


Register 3: (tlOOOXXX) CPC 6128 RAM - KonfiguraSon 


wappnet, geht man wie folgt vor: 

1. Man wartet auf den vertikalen Slrahl- 
rücklauf (mit obiger Routine) oder auf 
einen Interrupt (mit HALT). 

2. Warleschleife, um den Farbwechsel 
in die horizontaler Slrahlrücklauf-Re- 
gion zu lenken. 

3. Man konstruiert eine Schleife, die für 
eine Farbänderung genau 64 Mikrose¬ 
kunden benötigt, und führt sie zum Bei¬ 
spiel lOOmal aus. 

4. Jetzt wird die Farbdatentabelle ver¬ 
ändert. 

5. Zurück zu Punkt 1. 

Einen typischen Vertreter einer 64-Mil- 
lisekunden-Schleife finden Sie in der 
Abbildung. Ein Beispiel fürdieRastcr- 
baikentechnik finden Sic in Listing4. 
Direkter Nachfolger der Rasterbalken 
ist das Splitraster, aber mit einem klei¬ 
nen Unterschied: Die Farbe wird nicht 
einmal, sondern mehrmals pro Pixel 
beziehungsweise Raster/.eile geändert. 
Beispielsweise lädt man die Register H, 
L, D. E, C und A mit beliebigen Farb¬ 
werten und gibt sie dann der Reihe nach 
aus. während sich der Elektronenslrahl 
im sichtbaren Bereich befindei: 

OUT (C) ,H 
OUT (C) ,L 
OUT (C) ,D 

und so weiter. Einziges Problem: Das 
VSynC'Signal läßt sich nur noch unter 
großem Programmicraufwand zur Syn¬ 
chronisation verwenden, weil ein 
Durchlauf der Abfrageschleife über 7 
ms dauert, wodurch man das Splitra- 
sler-Programm nur auf 7 ms genau mit 


Die Gatc-Array- 
Hegisler 

dem Elektronenstrahl gleichschalten 
kann, was schließlich ein flackerndes 
Hin- und Herrutschen der Splilrastcr 
verursacht. Der Geistesblitz: Man be¬ 
dient sich des CPC-Interruptsystems: 
Jede 300stel Sekunde (auf die für uns so 
wichtige Millisekunde genau) unter¬ 
bricht die CPU ihre Arbeit und springt 
(im Interruptmodus 0) zur Adresse 
&38, wo normalerweise ein Sprung 
zum Interrupt-Händler des Betriebssy¬ 
stems steht. An besagte Adresse 
schreibt man jetzt eine einfache Rück¬ 
kehranweisung (EI: RET) oder einen 
Sprung zur Splitraster-Routine. Das 
Hauplprogramm läßt man nun mit ei¬ 
nem HALT-Befehl auf den Interrupt 
warten. Ein Beispiel linden Sie in Li- 
slingS. 

Nutzung des 
Interruptsystems 

Ein zwar schon leicht angegrauter, aber 
oft sehr wirkungsvoller Trick: Man lädt 
das CRTC-Rcgister 1 mit einem Wert 
größer als der in Register 0, meistens al¬ 
so &.40. Dadurch muß der CRTC den 
Horizonlalzyklus beenden, bevorer die 
geforderte Zeichenanzahl (64,&4()) ge¬ 
schrieben hat. Die Folge: Der Pointer 
bleibt hängen, und der CRTC gibt im¬ 
mer wieder dieselbe Textzeile aus. Eine 
auf diesem Trick aufgebaute Lauf¬ 
schrift wartet in Listing 6. Ein Problem 
ergibt sich aber bei CRl'C-Typ 2: Der 
Pointer wird eingefroren, er wird auch 
am Beginn des Vertikalzyklus nicht 
mehr neu geladen. Es ist also die Text¬ 
zeile sichtbar.in der sich der Elcklro- 


nenslrahl im Moment der Register-1- 
Manipulation befand. Dieser Umstand 
wird von Listing 6 berücksichtigt. 
Dippel-, Trippei- oder Quadruppcl- 
modus eignen sich gut für Leute, die 
wenig Bildschirmdaten schaufeln und 
trotzdem viel Bewegung sehen wollen. 
Die Lösung liegt iin machtvollen Regi¬ 
ster 9: Lädt man es mit den Werten 15 
(Dippel), 23 (Trippcl) oder 31 (Qua- 
druppel), so wird jede Textzeile zwei¬ 
mal, dreimal oder viermal hintereinan¬ 
der angezeigt. Der Pixelzeilenzähler 
durchläuft Werte bis 31. Es finden aber 
nurdie untersten drei Bits Verwendung, 
dadurch kommt es zur Wiederholung. 
Da aber eine Textzeile jetzt zweimal, 
dreimal oder viermal so groß ist, muß 
man auch die Werte in den Registern.4, 
6 und 7halbieren. dritteln oder vierteln. 

Dippelmodus: 

OUT SBC00,4 
OUT SBD00,19 
OUT &BC00, 6 
OUT SBDOO, 12 
OUT &BC00,7 
OUT &BDOO,15 
OUT &BCO0, 9 
OUT iBDOO, 15 

Quadruppel: 

OUT &BC00,4 
OUT &BDO0,9 
OUT &BCO0,6 
OUT &BD00, 6 
OUT &BC00, 7 
OUT &BD00,8 
OUT SBCOO, 9 
OUT SBDOO, 31 

Versuchen Sie doch nun einmal selb.sl, 
den Trippelmodus austüfteln. 

Der Screen-Squasher läßt sich zum ef¬ 
fektvollen Bildschirmauf- oder -abbau 
nutzen. Wie beim Rasterbalken wird 
hier in jeder Pixelzeile ein Register 
geändert, nur ist diesmal nicht das 
Gate-Array, sondern der CRTC das Op¬ 
fer, genauer: Register 1. Es wird am An¬ 
fang einer Rasterzeile entweder mit 0 
oder 40 geladen. Im ersten Fall wird nur 
Border gezeichnet und der Rest des Bil¬ 
des nach unten gedrückt, im zweiten 
Fall findet die Darstellung wie gewohnt 
statt. Der Effekt selbst läßt sich schwer 
beschreiben, Listing 7 bringt ihn aber 
auf den Monitor. 

Der Horizontal-Waggler, in deutschen 
Landen auch “Schwabbler” genannt, 
funktioniert nach demselben Prinzip 
wieder Screen-Squasher. Allerdings ist 
Register 2 das Ziel. Man verändert kon- 
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BegrllTserklärun}» 

CRTC ist eine Abkürzung für “Caihodc Ray Tube Controller”, das heißt, dieser Bau¬ 
stein ist für die Kontrolle des EIcktroitenslrahls, der das sichtbare Bi Id von hinten auf die 
Leuchtschicht der Bildröhre zeichnet, iin Ndonitor zuständig. 

Register des CRTC sind (wie zum Beispiel das H oder L Regi.ster der Z80A-CPU) 
nichts anderes als Speicherzellen direkt im Chip, was den Zugriff darauf entsprechend 
beschleunigt. 

I,ötbrücken sind Verbindungen auf der Plaline. die von den CPC-Anbietcrn (zum Bei¬ 
spiel AMSTRAD in Deutschland! angebracht werden, um den entsprechenden Firmen¬ 
namen in der Einschaltmeldung erscheinen zu lassen. Diese Brücken werden vom Be¬ 
triebssystem im ROM über den Paraliel-Port-Baustein 8255 abgefragt. Dadurch braucht 
nicht in jedem Land ein neuer ROM-Baustein eingesetzt zu werden, .fe nach Kombinati¬ 
on erscheinen dann ARNOLD, AMSTRAD. ORION. SCHNEIDER oder SAISHO am 
Monitor. 


linuierlich die Position des horizonta¬ 
len Rücklaufs, der durch den Bildfang 
/.war an der gleichen Stelle bleibt, wo¬ 
durch sich aber das Bild selbst ver¬ 
schiebt. Da der CRTC die.sen Eingriff in 
den empfindlichen Horizontalzyklus 
schwer verdaut, kommt es zu einer wei¬ 
chen Bildverschiebung. Für Register 2 
sind Werte von &2D bis &34 sinnvoll. 
CRTC-Typ-2-Besitzer müssen vorher 
Regi.ster3 mit einer 8 laden, da er sonst 
Werte über &31 in Register 2 nicht ver¬ 
kraftet. Ein entsprechendes Beispiel 
hierfür ist der Effekt des Bildschirm- 
verzerrers, wie er als 1-kByte-Pro- 
gramm im Ausgabe 2/3’92 abgedruckt 
war. 

Der Effekt des Vertikal-Wagglers zählt 
zu den neuesten Errungenschaften und 
ließ auch abgebrühte Demoschreiber 
beim Erstkoniakl erstaunen. Das Prin¬ 
zip ist das gleiche wie bei den obigen 
Beispielen, diesmal wird aber Register 
9 verändert. Je größer der Standardwert 
in Register 9 (normal 7) ist, desto un¬ 
sauberer der Effekt. Listing 8 verwen¬ 
det trotzdem den Wert 7. Die Routine 
kannn auch längst nicht alle Möglich¬ 
keiten ausschöpfen, die der Vertikal- 
Waggler bietet. Durch das ständige 
Abändern von Register 9 werden im¬ 
mer nur die ersten eins bis acht Pixel¬ 
zeilen einer Textzeile angezeigl, bevor 
der CRTC zur nächsten Textzeile wei- 
icrgehi. So entsteht der Slaucheffekt. 
der aber nur bei reinen Grafiken beson¬ 
ders gut wirkt. 

Tolle Effekte 

Overscan ist einer der wen igen Effekte, 
der auch von Spieleprogrammierern 
verwendet wird. Man erinnere sich an 
die Titelbilder der französischen Firma 
Titus (Crazy Cars II. Wild Streets), die 
den ganzen Bildschirm mit Border ein¬ 
nehmen. Natürlich werden keine Pixel 
gedehnt, sondern der Bildausschnitt 
wird vergrößert. 

Zuerst wird das Bild in die linke obere 
Ecke geschoben: 

OUT &BC00, 3 

OUT SBDOO, 8 ; für CRTC-Typ-2-Kom- 
patibilität/ 

OUT &BC00,2 

OUT &BD00,&32 ;Bild nach links 

schieben 

OUT &BC00,7 

OUT &BDOO,&23 ;Bildnach oben 

schieben 

OUT SBC00,1 

OUT &BDOO,48 /Bild in X-Richtung 


dehnen (48 Zeichen) 

OUT &BC00, 6 

OUT &BD00, 34 ;Bild in Y-Richtung 
dehnen (34 Zeilen) 

Statt 40x25 mißt der Bildschirm jetzt 
also 48x34 Zeichen. Der Nachteil liegt 
auf der Hand: Da der Bildschirmspei¬ 
cher nur 16 kByte groß ist, 48x34 Zei¬ 
chen aber (48x34x16=26112) fast 26 
kByte benötigen, erscheint ein be¬ 
trächtlicher Teil des Bildes doppelt. Als 
unser Retter aus dem Sumpf der Ratlo¬ 
sigkeit tritt diesmal Register 12 auf. 

Die Bits 2 und 3 sind für die Größe des 
Video-RAM verantwortlich, lädt man 
beide mit 1, adressiert der CRTC fortan 
32 kByte Bildschirmspeicher. Man op¬ 
fert also bereits die Hälfte des kostba¬ 
ren Speicherplatzes: 

OUT SBCOO, 12 
OUT &BDOO, &3C 

Im unteren Biklbcreicli ist jetzt die 
Bank 0 (&()00{)-&3FFF) eingeblendet, 
man kann also sogar einem BASIC- 
Programm (ab & 170) bei der Arbeit zu¬ 
schauen. Zum guten Schluß reißen wir 
die zwei kompliziertesten, dafür aber 
auch effektvollsten Spezialeffekie 
Screcn-Splitting und Hardware-Scrol¬ 
ling kurz an. Kein modernes Demo wä¬ 
re ohne diese beiden Alleskönner denk¬ 
bar. Eine bitgenaue Erklärung würde 
wohl weitere acht Seiten verschlingen, 
deshalb konzentrieren wir uns am be¬ 
sten auf die Grundzüge: 

1. Hardware-Scrolling: Dieser Trick 
wird immer dann verwendet, wenn ein 
bestimmter Bildbereich verschoben 
werden muß. die Software-Befehle wie 
LDIR oder LDI aber einfach zu lang¬ 
sam sind. Auch das Betriebssystem be¬ 
dient sich dieser Technik, um den Bild- 
schimi vertikal zu verschieben, wenn 


man ihn mit dem Cursor zu verlassen 
sucht. Es wird einfach die Bildschirni- 
siartadresse in den Registern 12 und 13 
um den Wert 40 erhöht oder vermin¬ 
dert. Will man ein horizontales Scrol¬ 
ling erreichen, genügt ein einfaches In- 
krenienlieren, zum Beispiel: 

10 FOR A=0 to 255 
20 CALL &BD19 
30 OUT &BC00,13 
40 OUT &BD00,A 
50 NEXT 

Programmiert man zum Beispiel eine 
Laufschrift, beschränkt sich die Arbeit 
der CPU auf Buchstabenschreiben am 
{weiterwandernden) rechten Rand. 
Durch 1 lardware-Scrolling verkompli¬ 
ziert sich allerdings auch die Berech¬ 
nung von Video-RAM-Adre.ssen: So 
folgt auf die Adresse &C7FF nicht 
&C800, sondern &CO0(). Wer das nicht 
glaubt, kann es überprüfen: 

“MODE 2” eingeben, mit dem Cursor 
28 Zeilen hinunterfahren, “POKE 
&C7FF, 255” tippen und die folgende 
Adresse mit POKE-Befehlen suchen. 
Im Zweifelsfall helfen für den Anfang 
die Systemroutinen (&BC20 bis 
&BC29). Der Nachteil des Hardware- 
Scrollings zeigt sich deutlich: Will man 
mehrals eine Laufschrift, beispielswei¬ 
se noch ein Bild darüber, wird auch die¬ 
ses gnadenlos mitgescrolli. Hier eilt 
uns 

2. Screen-Splitting zu Hilfe. Der Trick: 
Man ändert während des Bildaufbaus 
die Video-RAM-Adresse. Nach dem 
vertikalen Strahlrücklauf blendet man 
zum Beispiel mit 

OUT &BC00,12 
OUT &BD00, &10 
OUT &BC00,13 
OUT &BD00,0 
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die Speicherbank 1 (&4000-&7FFF) 
ein. die das Bild enthält. Hat der Elek¬ 
tronenstrahl den Bildschinn zur Hälfte 
gezeichnet, lädt man die Adresse, die 
auf die Laufschrift zeigt, in die Register 
12 und 13. Schön wäre es. ginge der 
CRTC jetzt gleich daran, die Lauf¬ 
schrift darzustellen. Doch die erscheint 
erst beim nächsten Bildaufbau. Der 
Grund: Der CRTC beachtet die Regi¬ 
ster 12 und 13 nur in dem Moment, 
wenn er daraus den Pointer neu lädt. 
Wie weiter oben beschrieben, ge¬ 
schieht das nur dann, wenn der interne 
Textzeilenzählerden Weit von Register 
4 erreicht hat. Wenn man einfach den 
Inhalt von Register 4 halbiert, ist ein 
Bild nur noch halb so hoch, und der 
CRTC stellt derer zwei untereinander 
dar. Allerdings erreicht der Textzeilen¬ 
zähler dadurch nie den in Register 7 
festgelegten Wert, es kommt zu keinem 
vertikalen Strahlrücklauf, und das Bild 
läuft haltlos durch. Halbiert man jetzt 
aber auch noch Register 7, hat man es 


geschafft. Es gibt sogar zwei vertikale 
Strahlrückläufe, von denen einer den 
Bildschinn genau in der Mitte teilt. 

Hier ist nun die Screen-Splitting-Rou- 
tine in BASIC: 

10 OUT &BC00,4 
20 OUT &BD00,19 
30 OUT &BC00,7 
40 OUT &BD00,15 

Listing 9 beinhaltet eine einfache As¬ 
sembler-Routine, die den Bildschirm 
sechsmal teilt, die entsprechenden Be¬ 
reiche scrollt und gleichzeitig die Verti- 
kaLstrahl-Rücklaufbalken verdrängt. 
Ein Ende des Rüstungswettlaufs der 
Demoprogrammierer ist in Sicht. Galt 
es vor zwei Jahren noch als Kunst, den 
Bildschirm in jeder Textzeile zu split¬ 
ten (Register 4 = 0), und war vor einem 
Jahr das Screen-Splitting in jeder Pixel¬ 
zeile die letzte Errungenschaft (Regi¬ 
ster 4, 9 = 0), so schafft man heute be¬ 
reits über drei Splits pro Pixelzeile, hat 


also endlich das horizontale Screen- 
Splitting erfunden. Doch hier zeigt 
sich: Die CPU verbraucht die ganze Re¬ 
chenzeit, nur um die Video-RAM- 
Adresse jede Pixelzeile dreimal zu än¬ 
dern, die dadurch erreichten Effekte 
sind auch wenig spektakulär, so daß 
man sich mit der Zeit mehr der Sofl- 
wareseite zu wenden wird: Vektorgra¬ 
fik und schnelle Sprite-Routinen (siehe 
ZAP’T’BALLS auf DATABOX 
4/5’92) werden die Demos der Zukunft 
sein. 

Die Assembler-Quelltexle zu den BA- 
SIC-Listings finden Sie auf der DATA¬ 
BOX zu dieser Ausgabe. 

Elmar Krieger/jg 


Literatur: 

-Multiface-II-Benutzerhandblatt 
-Programmierung der EGA- und 
VGA-Karten, Addison Wesley 


10 'SPECIAL EFFECTS #1 
20 '* 50HZ/60HZ SWAP * 

25 '{c)i992 Elmar Krieger & CPC Internatio 
nal 

30 INK 0,26:INK 1,0:BORDER 26:RESTORE 
40 GOSUB 80:PRINT”50Hz Bildwiederholfreque 
nz- Betrachtet man das Bild nicht direkt,s 
ondern aus denAugenwinkeln, so wird man vo 
n erbarmungslosem Flimmern getroffenl":CAL 
L KBB18 

50 GOSUB 80:PRINT”60Hz Bildwiederholfreque 
nz- Das Flimmern hat sich gebessert... 

Gegebenenfalls den Bildfang 
regulieren!":CALL &BB18 

60 GOSUB eo:PRINT”70Hz - Das Maximum. Das 
Bild laesst sich allerdings nur auf Gruenin 
onitoren einfangen... (V-HOLD)";CALL 

&BB18 

70 GOTO 30 

80 MODE 2:FOR a=4 TO 7:OUT ScBCOO ,a :READ i: 

OUT SBD0O,i:NEXT:RETURN 

90 DATA &26,&00,&19,&1E:'50HZ 

100 DATA &1F,&06,&19,&1B:'60HZ 

110 DATA &1B,&02,&19,&19:'70H2 


[1143] 

[1117] 

[2144] 

[2728] 

[17977] 


[11778] 


[10889] 


[340] 

[3204] 


[958] 

[1081] 


10 'SPECIAL EFFECTS #2 [1138] 

20 '****CRTC CHECK**** [249] 

25 '(c)l992 Elmar Krieger & CPC Internatio [2144] 
nal 

30 MODE 2:INK 0,0;INK l,26:BORDER 0 [3485] 

40 PRINT’'CRTC-Test aktiviert,"; [3128] 

50 cS(0)="SP=Typ 0";cS(l)="R=Typ l":cS{2)= [2605] 
''P=Typ 2" 

60 FOR a=&AOOO TO &A066:READ aS:b=VAL("&"+ [2309] 
a$) 

70 POKE a,b:c=c+b:NEXT [726] 

80 IF C011215 THEN PRINT’'-> Fehler in Dat [4595] 
azeilen!":END 

90 CALL &A000 [637] 

100 PRINT "CRTC 6845" ;cS(PEEK(fi.AF0O)) ,* " ge [4050] 
funden." 

110 END [110] 

120 DATA F3,2A,38,00,22,60,AO,21,FB,C9 [1719] 

130 DATA 22,38,00,06,F5,ED,7a,lF,D2,0F [1994] 

140 DATA A0,ED,78,1F,D2,15,A0,FB,76,21 [642] 


150 DATA 4B,O0,2B,7C,B5,C2,20,AO,ED,78 [2340] 
160 DATA 1F,DA,2F,A0,AF,18,2C,76,76,76 [2012] 
170 DATA F3,ED,78,1F,D2,33,A0,01,02,BC [1442] 
180 DATA ED,49,01,32,BD,ED,49,FB,76,76 [1238] 
190 DATA 76,76,76,76,76,06,F5,ED,78,IF [2093] 
200 DATA 3E,02,30,02,3E,01,01,2E,BD,ED [1464] 
210 DATA 49,F3,32,00,AF,21,00,00,22,38 [1331] 
220 DATA 00,FB,C9 [468] 


10 'SPECIAL EFFECTS#3 [1141] 

20 'TESTBILD FUER 4-9 [667] 

25 '(c)l992 Elmar Krieger & CPC Internatio [2144] 
nal 

30 'RUN "LISTINGX" [972] 

40 'RUN "LISTING3" [991] 


50 MODE 2:INK 0,0:INK 1,20:BORDER 0:FOa A= [15664] 
0 TO 320 STEP 20:MOVE A,0:DRAW 640,400^EX 
T:FOR A=0 TO 16:M0VE 0,400-A''2.2 :DRAW 640, 
400-A''2.2:NEXT:POR A=1 TO 25:LOCATE A*2,A: 
PR1NT"CPC AMSTRAD INTERNATIONAL";:NEXT 
60 CALL &BB18:CALL &4000:GOTO 60 [1583] 


10 'SPECIAL EFFECTS #4 [1152] 

20 '***RASTERBALKEN*** [1235] 

25 '(c)1992 Elmar Krieger & CPC Internatio [2144] 
nal 

30 MEMORY &2FFF:FOR A=&4000 TO S.40B3 [1702] 

40 READ BS;B=VAL(’'&"+B$) :POKE A,B [1468] 

50 C=C+B:NEXT:IF C<>17483 THEN 70 [2443] 

60 PRINT"Start mit CALL 6;4000":END [2598] 

70 PRINT’Tehler in Datazeilen":END [2574] 

100 DATA F3,21,A6,40,11,00,30,D5,3E,OA [2042] 

110 DATA E5,46,62,68,70,13,01,19,00,ED [1297] 

120 DATA BO,El,23,3D,20,FO,El,11,00,31 [1519] 

130 DATA 01,00,01,ED,BO,3E,C9,32,20,50 [1600] 

140 DATA 21,E8,03,E5,06,F5,ED,78,OF,30 [1189] 

150 DATA FB,21,95,01,2B,7C,B5,20,FB,21 [1147] 

160 DATA 00,30,3E,FA,01,00,7F,1E,10,56 [1610] 

170 DATA ED,49,ED,51,ED,59,SD,51,23,CD [870] 

180 DATA 00,50,3D,C2,45,40,3E,54,ED,59 [1882] 

190 DATA ED,79,DD,21,BO,40,06,04,CS,DD [1572] 

200 DATA 5E,00,16,31,lA,15,12,IC,DD,73 [1656] 


6/7’92 CPC 43 

















Know-how 


210 DATA 00,21,84,40,01,22,00,ED,BO,DD [2022] 
220 DATA 23,C1,10,E6,E1,2B,7C,B5,20,A9 [1316] 
230 DATA FB,C9,44,44,55,44,55,55,57,55 [1258] 
240 DATA 57,57,5F,57,5F,5F,4B,5F,4B,4B [1692] 
250 DATA 5F,4B,5F,5F,57,5F,57,57,55,57 [1985] 
260 DATA 55,55,44,55,44,44,5C,4C,4E,4A [1445] 
270 DATA 43,4A,4E,4C,5C,54,00,40,80,CO [1598] 


10 'SPECIAL EFFECTS #5 [1155] 

20 '***SPLIT-RASTER*** [1404] 

25 '(c)l992 Elmar Krieger & CPC Internatio [2144] 
nal 

30 MEMORY &2FFF;FOR Aa&4000 TO &40C1 [1706] 

40 READ BS:B=VAL(''&" + B$) :POKE A,B [1468] 

50 C=C+B:NEXT:IF CO19206 THEN 70 [1473] 

60 PRINT"Start mit CALL &4000":END [2598] 

70 PRINT"Fehler in Datazeilen":END [2574] 

100 DATA 21,9A,40,11,00,30,01,28,00,ED [2086] 

110 DATA BO,21,00,30,11,28,30,01,E8,03 [844] 

120 DATA ED,BO,2A,38,00,22,94,40,21,FB [1804] 

130 DATA C9,22,38,00,21,E8,03,06,F5,ED [2038] 

140 DATA 78,OF,30,FB,76,E5,76,F3,06,07 [1889] 

150 DATA 10,FE,00,00,ED,73,60,40,31,00 [2169] 

160 DATA 30,3E,AA,01,00,7F,ED,49,E1,D1 [1211] 

170 DATA ED,61,ED,69,ED,51,ED,59,ED,61 [1268] 

180 DATA ED,69,ED,51,ED,59,ED,61,ED,69 [907] 

190 DATA FD,BE,00,FD,BE,00,00,00,00,00 [1976] 

200 DATA 3D,C2,44,40,3E,54,ED,79,31,00 [1867] 

210 DATA 00,FB,3E,06,F5,26,30,6F,4E,06 [1658] 

220 DATA AA,54,5D,7D,C6,04,6F,D2,83,40 [1827] 

230 DATA 24,7E,12,10,F2,71,F1,D6,02,20 [1487] 

240 DATA E5,E1,2B,7C,B5,20,9A,21,00,00 [2087] 

250 DATA 22,38,00,C9,44,5C,58,56,55,4C [1743] 

260 DATA 4D,52,57,4E,4F‘,59,5F,4A,4F,4A [1778] 

270 DATA 4B,43,4B,4B,5F,4A,4F,4A,57,4E [1867] 

280 DATA 4F,59,55,4C,4D,52,44,5C,58,56 [902] 

290 DATA 54,54,54,54 [631] 


10 'SPECIAL EFFECTS#6 [1150] 

20 '**ONE LINE ONLY** [1023] 

25 '{c)1992 Elmar Krieger & CPC Internatio [2144] 
nal 

30 MEMORY &2FFF:FOR A=&4000 TO &4096 [1721] 

40 READ BS:B=VAL(”S.“ + BS) :POKE A,B [1468] 

50 C=C+B:NEXT:IF C<>15900 THEN 70 [2039] 

60 PRINT"Start mit CALL &4000":END [2598] 

70 PRINT"Fehler in Datazeilen":END [2574] 

100 DATA F3,3E,01,CD,OE,BC,01,02,BC,ED [1729] 

110 DATA 49,01,31,BD,ED,49,01,07,BC,ED [588] 

120 DATA 49, 01 , IC,BD,ED,49,01,00,7F,ED [766] 

130 DATA 49,OE,54,ED,49,21,E8,03,06,F5 [1784] 

140 DATA ED,78,0F,30,FB,E5,21,Ol,C0,E5 [1535] 

150 DATA 54,5D,ID,01,64,00,ED,BO,El,7C [2204] 

160 DATA C6,08,67,30,FO,06,64,10,B’E,01 [1475] 

170 DATA 01,BC,ED,49,01,40,BD,ED,49,3E [632] 

180 DATA 01,EE,01,32,50,40,28,18,21,02 [1298] 

190 DATA 09,CD,75,BB,3E,20,3C,32,5F,40 [1858] 

200 DATA FE,7E,20,05,3E,20,32,5F,40,CD [1461] 

210 DATA 5A,BB,F3,E1,2B,7C,B5,20,ÄF,01 [2991] 

220 DATA 01,BC,ED,49,01,28,BD,ED,49,01 [1567] 

230 DATA 02,BC,ED,49,01,2F,BD,ED,49,01 [850] 

240 DATA 07,BC,ED,49,01,1E,BD,ED,49,FB [1762] 

250 DATA C9 [276] 


10 'SPECIAL EFFECTS#? [1153] 

20 '*SCREEN SQÜÄSHER* [584] 

25 '(c)1992 Elmar Krieger & CPC Internatio [2144J 

30 MEMORY 8i2FFF:FOR A=&4000 TO &40Aa [1703] 

40 READ B$:B=VAL('’&"+BS):POKE A,B [1468] 

50 C=C+B:NEXT:IF C<>16235 THEN 70 [1365] 

60 PRINT’'Start mit CALL &4000":END [2598] 

70 PRINT"Fehler in Datazeilen":END [2574] 

100 DATA F3,01,10,7F,ED,49,OE,4C,ED,49 [2066] 

110 DATA 21,00,30,11,01,30,36,28,01,FA [1697] 

120 DATA 00,ED,BO,3E,C9,32,28,50,21,AB [1788] 

130 DATA 40, 3E, CO,77,23,06,08,30,FA,21 [1653] 


140 

150 

160 

170 

180 

190 

200 

210 

220 

230 

240 

250 

260 


DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 


01,05, 
F5,ED, 
7C,B5, 
BC,ED, 
ED,79, 
4F,40, 
3A,A9, 
F0,28, 
54,5D, 
2C,1C, 
DD,23, 
36,05, 
E1,2B, 


22,A9, 
78,OF, 
20,FB, 
49,04, 
23,7E, 
3E,28, 
40,47, 
1A,C6, 
IC,36, 
36,28, 
10,D8, 
2B,34, 
7C,B5, 


40,21, 
30,FB, 
3E,40, 
21 , 00 , 
7E,CD, 
ED,79, 
C5,DD, 
08,DD, 
00 , 01 , 
01,07, 
21,AA, 
7E,FE, 
C2,30, 


96,00 
21,8C 
ED,79 
30,16 
00,50 
DD,21 
6E,00 
77,00 
07,00 
00,ED 
40,35 
1A,20 
40,FB 


,E5,06 

,02,2B 

, 01,01 

,D2,7E 

,15,C2 

,AB,40 

,7D,FE 

,26,30 

,ED,B0 

,B0,C1 

,20,0A 

,01,35 

,C9 


[1167] 

[2360] 

[2140] 

[2085] 

[1282] 

[1301] 

[1502] 

[1347] 

[1832] 

[1077] 

[780] 

[1635] 

[1571] 


10 'SPECIAL EFFECTS #8 [1164] 

20 '*VERTICAL WAGGLER* [949] 

25 '(c)l992 Elmar Krieger & CPC Internatio [2144] 
nal 

30 MEMORY &2FFF:FOR A=St4000 TO &40F4 [1689] 

40 READ B$:B=VäL("&"+BS):POKE A,B [1468] 

50 C=C+B:NEXT:IF C<>22720 THEN 70 [1913] 

60 PRINT"Start mit CALL S.4000":END [2598] 

70 PRINT"Fehler in Datazeilen":END [2574] 

100 DATA F3,01,00,7F,ED,49,OE,54,ED,49 [1493] 

110 DATA 21,00,30,E5,11,01,30,06,00,DD [1293] 

120 DATA 21,DC,40,3E,19,DD,4E,00,71,0C [1102] 

130 DATA ED,BO,DD,23,3D,20,F4,21,FF,09 [2296] 

140 DATA 22,P5,40,3E,C9,32,28,50,3E,05 [1476] 

150 DATA 32,F7,40,El,11,00,31,01,FF,00 [1359] 

160 DATA ED,B0,21,Ce,00,E5,06,F5,ED,7B [2514] 

170 DATA 0F,30,FB,01,10,7F,ED,49,0E,40 [1747] 

180 DATA ED,49,21,8A,02,2B,7C,B5,20,FB [1802] 

190 DATA 01,04,BC,ED,49,01,65,BD,ED,49 [1633] 

200 DATA 01,07,BC,ED,49,01,4E,BD,ED,49 [1870] 

210 DATA 01,09,BC,ED,49,04,21,00,30,16 [1844] 

220 DATA 4B,7E,ED,79,23,7E,7E,CD,00,50 [1195] 

230 DATA 15,C2,79,40,OE,02,ED,49,21,F7 [1342] 

240 DATA 40,35,C2,42,40,36,03,2A,F5,40 [1407] 

250 DATA 7C,85,CC,D6,40,FE,OA,CC,D9,40 [1220] 

260 DATA 67,22,F5,40,5F,16,30,21,09,31 [1925] 

270 DATA 01,40,00,BD,BO,E1,2B,7C,B5,C2 [1725] 

280 DATA 41,40,01,04,BC,ED,49,01,26,BD [1742] 

290 DATA ED,49,01,07,BC,ED,49,01,1E,BD [1953] 

300 DATA ED,49,01,09,BC,ED,49,01,07,BD [1146] 

310 DATA ED,49,FB,C9,2E,01,C9,2E,FF,C9 [1153] 

320 DATA 00,00,00,00,00,00,00,00,00,00 [822] 

330 DATA 01,02,03,04,05,06,07,06,05,04 [1592] 

340 DATA 03,02,01,00,07 [792] 


10 'SPECIAL EFFECTS #9 [1167] 

20 '*SCREEN SPLITTING* [687] 

25 '(c)1992 Elmar Krieger & CPC internatio [2144] 
nal 

30 MEMORY &2FFF:FOR A=&4000 TO &40BC [1750] 

40 READ BS:B=VAL("&"+BS):POKE A,B [1468] 

50 C=C+B:NEXT:IF C<>19309 THEN 70 [2168] 

60 PRINT’'Start mit CALL &4000":END [2598] 

70 PRINT"Fehler in Datazeilen":END [2574] 

100 DATA 01,00,7F,ED,49,OE,54,ED,49,2Ä [1205] 

110 DATA 38,00,22,9A,40,21,FB,C9,22,38 [1370] 

120 DATA 00,21,E8,03,E5,06,F5,ED,78,OF [1435] 

130 DATA 30,FB,01,10,7P,ED,49,3E,40,D3 [1434] 

140 DATA 7F,01,04,BC,ED,49,01,05,BD,ED [1842] 

150 DATA 49,01,07,BC,ED,49,01,06,BD,ED [1771] 

160 DATA 49,CD,AO,40,76,CD,A5,40,76,CD [2094] 

170 DATA A0,40,76,CD,A5,40,76,CD,A0,40 [2697] 

180 DATA 76,CD,AS,40,76,01,04,BC,ED,49 [1750] 

190 DATA 01,03,BD,ED,49,01,07,BC,ED,49 [1135] 

200 DATA 01,03,BD,ED,49,2A,B8,40,23,CB [959] 

210 DATA 94,22,B0,4O,2A,BA,4O,11,FF,O3 [1110] 

220 DATA 19,CB,94,22,BA,40,E1,2B,7C,B5 [751] 

230 DATA C2,18,40,01,04,BC,ED,49,01,26 [1222] 

240 DATA BD,ED,49,01,07,BC,ED,49,01,1E [890] 

250 DATA BD,ED,49,21,00,00,22,38,00,09 [1373] 

260 DATA 2A, B8,40,18,03,2A,BA,40,01,00 [1641] 

270 DATA BC,ED,49,04,ED,61,05,OC,ED,49 [1737] 

280 DATA 04,ED,69,09,00,30,00,30,00 [1631] 
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Gemeinsamkeiten 

Interrupts unter MS-DOS und CPC 

Während die Hardware-Dealer dem verdutzten Kunden lin PC-Bereich im¬ 
mer höhere Taktraten um die Ohren werfen, stehlen gleichzeitig komplexe 
Oberflächen und neue Betriebssysteme Rechner-PoM er. Ein Grundfür viele, 
auch weiterhin unter MS-DOS der traditionellen Programmierungdlc Treue 
zu halten. Ein Streifzug durch die Interrupt-Technik deckt dabei unvermute¬ 
te Gemeinsamkeiten zwischen CPC- und Industriestandard auf. 


Bevor das Gespräch auf die InieiTupt- 
Programinierung unter dem CPC 
kommt, sei ein kleiner Blick auf den 
großen Bruder MS-DOS geworfen. 
DOS stellt wie jedes Betriebssystem 
dem Programmierereine Reihe von Be¬ 
triebssystemfunktionen zur Verfü¬ 
gung. Input-Output-Operalionen, Joy¬ 
stick-Abfragen, Dateifunktionen und 
SpeicheiTOutinen, alles läuft über soge¬ 
nannte Interrupts. Direkt übersetzt deu¬ 
tet der Name schon auf die Tätigkeit 
hin. Unterbrechung der laufenden Rou¬ 
tine und Sprung in ein Programm. 

Bewährte Technik 

Die verschiedenen DOS-lnterrupts 
werden durch einen Wert, angefangen 
bei 0, beziffert. Je nach Funktion sind 
dann dem InteiTupl einige Parameter 
oder auch eine Adresse über die unter 
DOS verfügbaren Register mitzuge¬ 
ben. Mit der Anweisung “int” wird 
dann die Routine angesprungen, und 
die benötigten Werte werden aus den 
Registern gelesen. Im folgenden Bei¬ 
spiel würde ein einzelnes Zeichen 
(“X”) unter MS-DOS auf dem Bild¬ 
schirm ausgegeben: 

mov AH, 02h / 2 nach AH 
mov DL, 'X' ; Zeichen nach DL 
int 21h ; Interrupt Aufruf 

Im Register “AH” befindet sich dabei 


die Funktionsnummer des entspre¬ 
chenden Interrupts. 

Zu Jedem Interrupt gehört natürlich ei¬ 
ne eigene Adresse, die auf die eigentli¬ 
che Programmroutine zeigt. Diese 
Adresse kann man, ebenfalls über einen 
Interrupt, auslesen und so eigene kleine 
Programme vor, hinter oder über die 
Betriebssystemroutine legen. Ein be¬ 
sonderer Interrupt ist nicht nur unter 
MS-DOS der Timer-Interrupt. Er wird 
im Gegensatz zum “int” von der Hard¬ 
ware ausgelöst. Was unter DOS der 
“IRQ” ist, nennt sich beim CPC INT- 
Signal (nicht mit dem Software-Int von 
DOS verwechseln). 

Aufforderung zum Tanz 

INT bedeutet “Anforderung einer Un¬ 
terbrechung”. Das INT-Signal wird 
beim CPC vom “Gate-Array” zirka 
300mal in der Sekunde erzeugt. 

Das Gate-Array ist so eine Art Platzan¬ 
weiser für den ROM-Bereich im CPC. 
So ganz nebenbei sorgt er aber auch für 
da.s erwähnte Timer-Signal, das beim 
Setzen zur Abarbeitung des momenta¬ 
nen CPU-Befehls und zur anschließen¬ 
den Unterbrechung des aktuellen Pro¬ 
gramms führt. 

Die Adresse des nächsten im aktuellen 
Programm stehenden Befehls wird auf 
den Stapel gelegt, und anschließend 
findet ein Sprung zur Adresse &0()38 
statt. Im Prinzip handelt es sich also um 


einen normalen “CALL &0038”, nur 
daß er automatisch und innerhalb eines 
beliebigen Programms stattl‘indet. 

Das Betriebssystem des CPC kann da¬ 
bei zwischen einer vom System selbst 
erzeugten und einer vom Programmie¬ 
rer extern hervorgerufenen Interrupt- 
Anforderung unterscheiden. Bei einer 
anwendergesteuerten Unterbrechung 
wird dann automatisch der Code ab 
&003B ausgeführt. Hinter dieser Spei¬ 
cherstelle sind jedoch nur noch fünf 
Bytes für reinen Programmcode frei. 
Über einen Jump-Befehl kann jedoch 
auf freie RAM-Bereiche ausgewichen 
werden. Ein an der Stelle &003B ste¬ 
hendes Programm darf natürlich nicht 
sehr lang sein, denn schon nach 1/300 
Sekunde erfolgt ja die nächste Inter¬ 
rupt-Anforderung. 

Das hört sich zuerst nach wenig Zeit für 
sinnvollen Assembler-Code an. 
Tatsächlich kann die Z80-CPU aber in 
diesem Zeitraum locker ein- bis zwei¬ 
tausend Maschinenbefehle ausführen. 
Um nach dem Ende der vom Anwender 
gesteuerten Unterbrechung mit dem ei¬ 
gentlichen Hauptprogramm weiterfah¬ 
ren zu können, müssen die Inhalte aller 
verwendeten Register wieder in den 
Zustand vor der Unterbrechung ge¬ 
bracht werden. Für die “Rettung” der 
Registerwerte benutzt das System 
selbst den Zweitregistersatz der Z80- 
CPU. Der Programmierer sollte deswe¬ 
gen diesen Zweitregistersatz nur nach 
vorheriger Interrupt-Sperrung benut¬ 
zen. 

Nicht nur bei der Nutzung des Zweitre¬ 
gistersatzes kann eine Ausschaltung 
der vom System vorgegebene Unter¬ 
brechung erwünscht sein. Durch die 
Anweisung “Dl” können alle INT-Un- 
terbrechungen gesperrt und mit “EI” 
wieder zugelassen werden. 

Ulrich Schmitz/jg 


: ASMKRS.ASM 

;(c) Ulrich Schmitz S CPC International 
;Beispiellisting zur Einbindung eigener Routinen in 
;die Interruptbearbeitung 
ORG &4000 

DI ;Systeminterrupts sperren 

LD DE,(&39) ;Interruptadresse merken 

LD (OLD),DE 

LD DE,PRG ;Zeiger auf das eigene 

LD {&39),DE ;Programm ablegen 

EI ;Interrupts wieder zulassen 

RET ;RückBprung 

OLD: DEFW 0 ;Normale Interruptadresse 

;Eigene Interruptroutine 

PRG: DI ;Systeminterrupts sperren 

;Sprung zur Interruptroutine auf dem Stack ablegen 


PUSH HL 


LD HL,(OLD) 

;Nach RET wird zur normalen 

EX (SP),HL 

;Interruptroutine gesprungen 

PUSH AF 

;Register retten 

PUSH HL 


PUSH DE 


PUSH BC 


PUSH IX 


PUSH ly 


POP lY 


POP IX 


POP BC 


POP DE 


POP HL 


POP AF 


RET 
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Vor der genaueren Betrachtung sieht 
natürlich erst einmal die Frage, welche 
Schlei feniypen unser CPC kennt. Wenn 
wir das Handbuch zu Rate ziehen, fin¬ 
den wir vier, genauer drei verschiedene 
Möglichkeiten, eine Schleife zu pro¬ 
grammieren. Die ersten drei Komman¬ 
dos sind Schleifenbefehle im klassi¬ 
schen Sinn: FOR-NEXT, WHILE- 
WEND und GOTO. Das vierte Kom¬ 
mando ist strenggenommen eigentlich 
kein Schleifenbefehl. Er wird erst zu ei¬ 
nem solchen durch die Kombination 
“IF Bedingung TflEN GOTO irgend¬ 
wohin”. Aber da diese Sequenz so oft 
verwendet wird und auch ihre Vorteile 
hat, kann man sie ruhigen Gewissens un¬ 
ter die Rubrik Schleifenbefehle fassen. 
Wo setzt man nun welchen Schleifen¬ 
typ am sinnvollsten ein? Mit etwas Ge¬ 
walt kommt man mit einem Schleifen¬ 
typ aus, nur hat das zur Folge, daß die 
Lesbarkeit und manchmal auch die 
Allsführungsgeschwindigkeit der Pro¬ 
gramme sinkt. Eine FOR-NEXT- 
Schleife wählt man, wenn die Anzahl 
der Wiederholungen feslsteht. Wenn 
also 20mal der Text “Hallo Welt!” aus¬ 
gegeben werden soll, wäre die elegan¬ 
teste Möglichkeitfolgende: 


10 FOR Zaehler=l to 20 
20 PRINT "Hallo Welt!" 

30 NEXT 

Benutzt man andere Schleifentypen, 
ist für diesen Zweck die Lösung garan¬ 
tiert länger. Eine WHILE/WEND- 
Schleife benutzt man beipielsweise 
für Programmteile, die so lange ausge- 
führt werden, bis eine bestimmte 
Bedingung erfüllt ist. Ein Beispiel 
hierfür ist das Lesen aus einer Datei 
bis d as Dateiende erreicht i st. 

Im folgenden stellen wir Ihnen einige 
Schleifenkonstruktionen vor und wol¬ 
len Ihnen damit die eine oder andere 
Anregung geben. Oft kommt es vor, 
daß man eine unbekannte Anzahl von 
Elementen einiesen will, aber später 
auf deren Anzahl zurückgreifen muß. 
Wie dies am einfachsten geschieht, 
zeigt das folgende kleine Programm. Es 
liest Zeichen von der Tastatur ein, bis 
die <ENTER>-Tasie gedrückt wird. 
Dann gibt es die Zeichenkette rück¬ 
wärts wieder aus: 

10 Text$="" 

20 Anzahl=0 

30 Taste$="" 

40 WHILE Taste$CHR$ (13) 


50 Taste$="" 

60 WHILE Taste$="" 

70 Taste$=INKE’i:? 

80 WEND 

90 Text$*Text$+Taste$ 

100 PRINT Taste$; 

],10 Anzahl=An 2 ahl+l 
120 WEND 
130 PRINT 

140 FOR Position=An 2 ahl TO 1 
STEP -1 

150 PRINT MID$(Text$, Positi¬ 
on,!) ; 

160 NEXT 

Spätestens jetzt stellt sich natürlich die 
Frage, welche Schleifenkonstrukiio- 
nen überhaupt erlaubt sind. Die Kurz¬ 
formel lautet: Verschachtelte Schleifen 
sind erlaubt, sich üherkreuzende hin¬ 
gegen nicht. - Was ist damit konkret ge¬ 
meint? Wenn man sich das FOR als eine 
Seite einer Schachtel und das NEXT als 
die gegenüberliegende Seite vorstellt, 
kann man in diese große Schachtel vie¬ 
le kleine hineinstellen, ln BASIC ent¬ 
spricht dies der Tatsache, daß zwischen 
dem Anfang und dem Ende einer 
Schleife beliebig viele andere Schlei¬ 
fen stehen dürfen. 
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Das sieht dann zum Beispiel so aus: 

Schleifenbeginn 1 
Schleifenbeginn 2 
Schleifenende 2 
Schleifenbeginn 3 
Schleifenende 3 
Schleifenende 1 

Wenn man aber versucht, eine Schach¬ 
tel in eine andere so hineinzustellen, 
daß eine Seite in der ensten Schachtel ist 
und die andere außerhalb, dann wird 
man wohl kaum Erfolg haben. Genau¬ 
sowenig wie bei Schachteln ist dies in 
BASIC möglich. Folgende Konstrukti¬ 
on istnichlgestattet: 

Schleifenbeginn 1 
Schle!fenbeginn2 
Schleifenende 1 
Schleifenende 2 

Aber abgesehen von dieser Ausnahme 
ist alles erlaubt, solange es noch von ei¬ 
nem Außenstehenden nachvollzogen 
werden kann. Untrennbar miteinander 
verbunden sind Schleifen und Felder 
(Arrays). Da bei Feldern oftmals der In¬ 
dex periodisch verändert wird, bietet es 
sich an, hierfür beispielsweise eine 
FOR-NEXT-Schleife zu verwenden. 
Ais Beispiel für die Kombination von 
Feldern und Schleifen soll eine kleine 
Adreßverwaltung dienen. Diese Ver¬ 
waltung soll folgende Optionen bieten: 

1. Adresse ergänzen 

2. Blättern 

3. Adresselöschen 

4. Adressen speichern 

5. Adressen laden 

Weitere Punkte, wie Drucken, Sortie¬ 
ren oder Suchen, können Sie selbst 
nach Belieben hinzufügen. Eine lauf¬ 
fähige, allerdings noch sehr primitive 
Version finden Sie am Ende des Arti¬ 
kels. 

Doch nun wollen wir uns einer weiteren 
sehr nützlichen Anwendung für Schlei¬ 
fen zuwenden. Bisher wurde noch nicht 
erwähnt, daß die Laufvariablen wie 
normale Variablen verändert werden 
können. Allerdings sind die Auswir¬ 
kungen einer solchen Änderung meist 
sehr konfus und in den seltensten Fällen 
erwünscht. Doch betrachten wireinmal 
einen solchen Fall: Der Schleifenzähler 
wird innerhalb der Schleife immer 
dann auf null gesetzt, wenn keine Taste 
gedrückt ist. Die Schleife läuft von null 
bis eins. Das heißt, daß unsere Schleife 


so lange abläuft, bis eine Taste gedrückt 
wird. 

Dieser “Mißbrauch” der FOR-NEXT- 
Schleife findet seine Vollendung in der 
Programmiersprache C. Dort wird bei 
der FOR-Schleife nur noch angegeben, 
was am Anfang und nach jedem Durch¬ 
lauf der Schleife gemacht werden soll 
und die Bedingung, deren Erfüllungdie 
Schleife beendet. 

Notwendiger Mißbrauch 

Es ist also im Extremfall möglich, so 
lange den Bildschinn zu löschen, bis 
die Systemuhr 13:13 Uhr zeigt. Doch 
zurück zu unserem guten alten BASIC. 
Auch dort kann man derartige Spiele¬ 
reien programmieren, wie die oben be¬ 
sprochene Routine, die auf einen Ta¬ 
stendruck wartet: 

10 FOR Bedingung«0 TO 1 

20 IF INKEY$="" THEN Bedingung=0 

30 NEXT 

Natürlich ist das umständlich, aber 
manchmal ist diese Methode dennoch 
elegant, um eine FOR-NEXT-Schleife 
zu verlassen. Nur ein Beispiel: In einer 
FOR-NEXT-Schleife wird der ganze 
Bildschirm mit Linien gefüllt. Auf Ta¬ 
stendruck soll diese Schleife allerdings 
verlassen werden. Die gängige Art ist 
wohl diese: 

10 FOR Zaehler=0 to 639 

20 MOVE Zaehler, 0 

30 DRAWZaehler,399 

40 IF INKEY$<>"" THEN GOTO 60 

50 NEXT 

60 END 

Schön und gut, aber wie wir in der er¬ 
sten Folge dieses Kurses gesehen ha¬ 
ben, ist der GOTO-Befehl an sich ver¬ 
pönt. Er hat BASIC seinen schlechten 
Ruf als unstrukturierte Programmier¬ 
sprache eingebrachl. und das nicht zu 
Unrecht. Übersichtlicher ist es, wenn 
man den Schleifenzähler auf einen be¬ 
stimmten Wert setzt, um die Schleife zu 
beenden. Zusätzlich kann so auch der 
vorzeitige Abbruch vermerkt werden. 
Man setzt “Zaehler” einfach gleich 
32000. Da dieser Wert nie Vorkommen 
kann, weiß man später, daß eine Taste 
betätigt wurde: 

10 FOR Zaehler=0 to 639 
20 MOVE Zaehler, 0 
30 DRAW Zaehler, 399 
40 IF INKEY$<>"" THEN 


Zaehler=32000 
50 NEXT 

Was man bei dieser Methode beachten 
muß, ist, daß der NEXT-ßefehl den 
Zähler noch um eins erhöht. Die Varia¬ 
ble “Zaehler” hat nach dem Ende der 
Schleife also den Wert 32001. Dies ist 
bei späteren Abfragen wichtig. Diese 
Verwendung des FOR-NEXT-Befehls 
soll als Anregung dienen. Sie .sehen, 
was alles möglich ist. Grundsätzlich ist 
dann die direkte Manipulation der 
Schleifenvariable sinnvoll, wenn eine 
bestimmte Variable eine Grenze nicht 
über- oder unterschreiten darf. Nun zu 
einem anderen Thema. Die Rede ist von 
den Kassetten- beziehungsweise den 
Diskeltenroutinen. Wenn wir die Dis¬ 
kettenbefehle des CPC betrachten, 
geschieht dies natürlich nicht ohne 
einen Hintergedanken. In der Mini- 
Adreßverwaltung kommen auch Op¬ 
tionen vor, um Daten zu laden und zu 
speichern. 

Wie geht das nun vor sich? Der CPC 
kennt drei verschiedene Dateiarien. 
Das sind BASIC-, Binär- und ASCH- 
Dateien. Nun kann man von BASIC aus 
leider nur ASCl [-Dateien erzeugen. 
Das hat aber wiederum den Vorteil, daß 
die erzeugten Daten mit einem norma¬ 
len Textverarbeitungsprogramm ver¬ 
ändert und angezeigt werden können. 

Diskettenbefehle - 
fast unentbehrlich 

ASClI-Daieien sind sehr einfach auf¬ 
gebaut. Sie bestehen nur aus den Daten, 
die in sie hineingeschrieben wurden. 
Diese Daten können mit den gleichen 
Befehlen geschrieben und gelesen wer¬ 
den wie bei Bildschirmzugriffen (PRINT, 
WRITE.INPUT.LINEINPUT). 

PRINT funktioniert wie gewohnt, nur 
müssen nach dem PRINT-Befehl ein 
Ziffemzeichen (#) und die Gerätenum¬ 
mer stehen. Sie gibt an, zu welchem 
Ausgabegeräl die nachfolgenden Da¬ 
ten gelangen sollen. Folgende Num- 
memsind erlaubt: 

0-7: Die Nummern Obis 7 bestimmen 
ein Fenster, in das geschrieben werden 
soll. 

8: Die Ziffer 8 bewirkt ei ne Ausgabe an 
den Drucker. 

9 : Die 9 leitet die Ausgabe auf das Kas¬ 
setten- beziehungsweise Disketten- 
laufwerkum. 

Um also in eine Datei den Text “Der 
CPC ist der Beste!” zu schreiben, muß 
man folgendeseingeben: 
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ln der Miniadreßver- 
wahungkann man be¬ 
quem blättern 


“INPUT #9. Variable” oder “LINE 
INPUT #9, Variable” die Daten von 
Diskette ineine Variable holen.-Worin 
liegt nun der Unterschied zwischen 
beiden Befehlen? Der INPUT-Befehl 
arbeitet wie gewohnt. Er teilt die an- 
kommenden Daten in Pakete, die durch 
Kommas getrennt sind. Dann weist er 
den angegebenen Variablen die Pakete 
zu. 

An sich würde der INPUT-Befehl auch 
genügen, wenn man nicht manchmal 
auchTexldateienlesen müßte. Dann in¬ 
terpretiert INPUT nämlich die gram¬ 
matikalisch richtigen Kommas als 
Trennzeichen. Wie das genau aussieht, 
soll folgendesBeispiel zeigen: 


PRINT #9, "Der CPC ist der Bestei" 

Leider erzeugt der CPC daraufhin eine 
Fehlermeldung. Das hat natürlich auch 
seinen berechtigten Grund. Dem CPC 
ist zwar bekannt, daß er etwas auf die 
Diskette schreiben soll, aber noch lange 
nicht, wohin dieser Text soll. Um ihm 
zu sagen, wohin der Text gelangen soll, 
verwendet man den OPENOUT-Be- 
fehl. Er erzeugt eine Datei auf Diskette 
mit dem Namen, der in Gänsefüßchen 
auf den Befehl folgt. Alle Ausgaben 
über #9 gehen ab jetzt in diese Datei. 
Wenn man fertig ist, schließt man die 
Datei mit CLOSEOUT. Um also in die 
Datei CPC den Text “Hallo Leute!” zu 
schreiben, lautet die korrekte Version: 

10 OPENOUT "CPC" 

20 PRINT #9, "Hallo Leute ! " 

30 CLOSEOUT 

Es ist sehr wichtig, geöffnete Dateien 
zu schließen, wenn sie nicht mehr ge¬ 
braucht werden. Sonst besteht die Ge¬ 
fahr, daß diese noch offenen Dateien in 
die “ewigen Jagdgründe” eingehen, die 
Daten also verloren sind. Besonders 
dann, wenn Sie Dateien auf mehreren 
Disketten benötigen, ist die Gefahr 
groß, daß Daten verlorengehen. Doch 
nun zu etwas weniger Gefährlichem, 
dem Einlesen von Dateien. Das Einle¬ 
sen von Daten funktioniert prinzipiell 
genauso wie das Schreiben, nur die Ge¬ 
fahr des Datenverlustes besteht nicht. 
Um aus einer bestimmten Datei etwas 
zu lesen, benutzt man einfach statt des 
Befehls “OPENOUT” den Befehl 
“OPENIN” und zum Schließen der Da¬ 
tei das Kommando “CLOSEIN”. 

Bei der Dateiverwaltung gibt es aber 
leider ein Problem. Man kann nur aus 


einer Datei lesen und in eine andere 
schreiben. Gleichzeitig aus einer Datei 
zu lesen und in dieselbe zu schreiben ist 
unterBASTC nichtniöglich. 

Neben den bisher betrachteten Befeh¬ 
len zur Dateibehandlung gibt es noch 
einen speziellen Befehl, der ein Ver¬ 
wandler des PRINT ist. Dieser Befehl 
heißt WRITE. Er bewirkt im Prinzip 
genau das gleiche wie sein Bruder 
PRINT, nur mit dem Unterschied, daß 
alles, was nach dem WRITE steht, aus- 
gegeben wird. Das hat seine Vorteile, 
wenn man zum Beispiel folgenden Text 
ausgeben will: “Das Weiter ist Ja su¬ 
per!” Das Problem bei diesem Text sind 
die Anführungszeichen. Mit einem 
PRINT sähe das dann so aus: 

PRINT CHR$ (34) +"Das Wetter isz 
jasuper!"+CHR${34) 

Der Ausdruck CHR$(34) steht für das 
Anführungszeichen. Wesentlich einfa¬ 
cher läßt sich dieses Problem mit einem 
WRITE lösen: 

WRITE "Das Wetter ist ja super!" 

Beim WRITE-Befehl werden alle Zei¬ 
chen ausgegeben, die ihm nachfolgen, 
auch unsere zwei Anführungszeichen. 
Ansonsten bewirkt der WRITE-Befehl 
dasselbe wie eine PRINT-An Weisung. 

PRINT kontra WRITE 

Jetzt, wo alle Daten ordnungsgemäß 
auf der Diskette abgespeichert sind, 
will man sie meistens auch wieder le¬ 
sen. Dabei gibt es verschiedene Mög¬ 
lichkeiten. Zuerst muß die entspre¬ 
chende Datei mit OPENIN geöffnet 
werden. Dann kann man entweder mit 


10 OPENOUT "TEST.DAT" 

20 PRINT #9, "Der CPC ist klein, 
aber oho!" 

30 CLOSEOUT 
40 OPENIN "TEST.DAT" 

50 INPUT #9, Text $ 

60 PRINT TextS 
70 CLOSEIN 

Der Bildschirm sieht nach Programm¬ 
ende so aus: 

Der CPC ist klein 

Das ist aber nur die Häl fte unseres Tex¬ 
tes, da das Komma das Ende der ersten 
Eingabe angibl. Lesen wir noch einen 
Wert ein, erhalten wir den Rest, näm¬ 
lich “aber ohol”. Das eigentliche Pro¬ 
blem bei dieser Anwendung ist nun 
aber weniger das fehlende Komma, 
sondern vielmehr, wann eine neue Zeile 
beginnt, da ja das Zeilenende wie ein 
Komma wirkt. Deshalb ist hier der Be¬ 
fehl “LINE INPUT” unbedingt not¬ 
wendig, um unnötigen Ärger zu erspa¬ 
ren. Ändern Sie bitte die Zeile 50 in: 

50 LINE INPUT TextS 

Jetzt tut der CPC endlich, was ihm sein 
Herr und Meister befohlen hat, er gibt 
den vollständigen Text au.s. Zum 
Schluß noch etwas zu den Diskellen¬ 
fehlermeldungen. Da der CPC 464 im 
Unterschied zum CPC 6128 diese nicht 
behandelt, ist es besser, sie gleich zu 
vermeiden. Dies geht am einfachsten, 
indem der Anwender über jeden Dis¬ 
kettenzugriff unterrichtet wird. Wenn 
man die Anweisungen des Programms 
dann genauestens befolgt, können Dis¬ 
kettenfehler, die beim 464 zum Pro¬ 
grammabbruch führen, ausgeschlossen 
werden. Markus Kräutner/jg 
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Ihre Quelle für 
bewährte Qualitäts¬ 
software: Bei uns 
finden Sie Futter 
für Ihren Computer 
— zum Mini-Preis! 


Beachten Sie bitte für 
alle Produkte im DMV- 
Versandservice unsere 




''’UnnWiUiipii: vwi ilci A«/:ihl üoi hoMollkn 
Hnigruinixv oder Holle hcivchrv.‘ii wirKcifiilor 
Soiiüung rur il:iv InLincI d,— DM. liilr rkr> Airs¬ 
land 6 .— DM PoiIouikI Voi'iratkuiii:.Alle Soll' 
»ure-Produkle für CPC und Joyce wcnkii. 
ftcnn nichl iindcrs- oi^egchcn, uul l-Zoll Dis. 
kelKii Jiisgclicicrl, Hiilo hcnehtcii Sie die je- 
wcilipeii Befiel limmniem undbcniiueii Sie die 
diesem Hcl'i hcigefligKsi Besiellkarli-n 


DMV-Verlag * Postfach 250 • 3440 Eschwege 



für CPC 464, 
664 und 6128: 



C'opVsShop 

Diis universelle Rildsrhirmdruck-Priiurumin l'ur ulle CPCs. Wul¬ 
len Sie Ihre iraumtufi Khdnc Kiukialgrdrik im Freunderktcis«i|«n, 
oder hruuclieii Sie /u lliiem selbsigc'iclinebcncn Prr^Tamm enen 
Kunimll-Ausdruck? CopyShup briiigl Ihre BildsehirminsicMcn zu 
Papier, auch mil den ««olirctwlcn Oruckem. Versthiedene .SchralTu- 
ren lUr CraulOne lärmen skh den einzelnen Bildschirmficrben frei 
zuordnen Bin Shnw-Mivdus zcigi Urnen die llimkupy vor dem 
cndglllligen Ausdruck aul’dem Bildrelntm< 

M Vctnrhcilci Bilderim S(andard-Screcnformal(l 7 kBylc- 
Bmlirl'ileii) 

M Vier Ausdruck-Forma» vm handlich bis DIN A 4 quer 
I Aihcilci in allen drei CPC-Bildschiimmodi 
B Iniegriericr Giafikediiot mit FUlKunklion und Druck- 
voraussichl 

B Beliebige AusschniliavcrgroScrunecn und Invertierung 
B AnpjssuRgKncnil fUrallc Epson- und.Seikosba-Druckcr 
B Auch für gedrehte Bilbilil-Byies, /-ß. beim NEC P 2 
B Mil spekherplai/.rpareitdem Scrcendump-Utillty zum Vorta- 
ilen — erzeugt auf Tastendruck Bilddaieien im Standard- 17 - 
kDyic-Fbnnal aus beliebigen lautenden Prr^ammeii hcriius 
B Mit selbsirclozicrcndcr HnTdcopy-Koulinc für eigene fAo- 
grjiiitne 

»i-s«.-Nr. 202 , DM 49 ,- 


l'urbo-DATA-CPC’ 

Volldampf in der Dateiverwaliung 

BnuichcnSie em neues AdceUbuchoderTclcfonverzeichms'.’Müssen 
Sie Ihre Sammluiigeii von Briefnuiikcn. Scliallplallen, Dias iHler 
anderen Schätzen sortieren’ Alles kein Problem mit Turbu-D.ATA- 
CPC’, der univeiscllcn Dwunbaiik lür aUe CPCs mil Diskeltenlmil- 
vvei’k. 

rurbo-DA'rA-CPC lülft Ihnen. Ubersiehl und ürdimiig In Ihre Daten 
/u bringen. Ein kurzer Bliekaufcinige tztistungsmcrkmalegellllig? 
— Bitte -»hr 

B Universell durch veränderbare Ein- und Ausgahciiiaskcii 
B Deutsclw Umlaule mit DIN-Tastnuirbclcgiing 
B Blitzschnell« SuchlunkiloiKn durch Indcxlckler 
B DaiciLapj/iiiii bis zu SO verschiedenen Beldcm 
B Bis zu 191 -elilcr gleichzeitig auf dem Bildrehmn sichllui' 

B Resonders schnelle und uinfiiiigreiche Sortrerrunklion 
B Eigene Diskclleu-Knniulicmvuiine mit be.soiiders huhei 
Kapn/iltil 

B Zweiteilung des Biklsehnms in ütalus- und Arbeitsfeld 
B Kumplelie Di uckiuuiinen, auch lUr Elikelicndruek 
Besl-Nr. 214 ,l)M 69 ..* 


Für Profis: CPC Special Offer 2 

vier Programme der .Slar-Dlvision im Sonderpreis-Paket 

»ivAvur(-S{ar; Leiuungaslnrke UnskeitonVerwaltung mit hohem ßedw- 
nungskumfon und inlegriertem Diskcncpmanagcr. \tcrtvalicn. Archi¬ 
vieren, Kalillogislcfen Ihrer Disketten und Ausdruck der Daten — ma 
Divkaorl-Siai' kein Problem. 

Itetignrr-Slar. .Malprugrannii zisn komfurUblenAiifeciigcn von Bild- 
schirmgrafikca Zur Ikdienung gcnügl d» verttauie Taslalui. Auf 
Tastendruck wertien Sie ps,*r Hilfsmcnil durch di» Programm gcftihn. 

Crtalor-.Siar; Machen Sie Ihre eigenen CPC-BuMe-Pnigrummc durch 
Tnekl'ilmicquenzcn mit animierter/cichcnsal/graßk muiressanlcr.Oirr 
Crealiir-Slur bietet je einen Editor fUr siebende und ammieiic Motive 
(Kulissen- undShi^-Dcsigner). Die Editoren sind atsProgrnmmgene- 
raioivn ausgelegl undeizeugcii Basic-Code, dennncibalblhrcrcigcnen 
Pfogmmtne wciieiverarbeiict und eingesetzt worden will Beliebige 


(’onTexf ( PC: die alita^staii^liche 
Textverarbcifiinj» für jeden CP('I 

Lassen Sie Ihren CPC niclil versiauben! Mil 
ConTexl CPC erwerben Sie ein Anwendungs¬ 
programm. das eine überzeugende Leistung bei 
einfacher Bedienung bieiel. Die ausführliclie 
deutsche Anleitung »nacht es auch dem lechni- 
schen Laien möglich, schon nach kürzcstcrZcit 
Briefe, Rcferaic und vieles andere mit dem 
Computer zu schreiben. 


»tMT schart ml wil aia HtM» 


« m ainar «MrUt. 


f oirrtivriBs i 
la VartaHa i 


ierau 


ki9 hkKM d«w van Pftau4Q4A»]MC? tlaieha hakn «ir 

taa*Mrwat Hairfai 

Hutn aaeht md iiaVs aickl inAi if|t »l«h »xl 
rdalisti Mi ist, Ia Aufhftfi SiBMr 4i« Zaif 

ai( wMil lu varbriHi*'^ 


5o)ilAglooh«r. 





Ijufvehrtfl-Tcxic lassen sieh inicgrieren, In emci' eigenen IVogr.nii- 
tnierspiudie las.Neii sich Shapes niileiiijiHler Vv-ibinden und Kulissen 
dbereinniidetlegttii, 

.Star- 4 f«n Professionelle rpr-Ptogrummicrimg mit Assomhlcr.Disns- 
semblcT und Monitor. Das .System hcsitz.l einen eigenen Diskeiicnnui- 
nitor und EdiUn, eine Trace-FunkUun, kuiin Breakpuinls setzen und 
Bunkswilchiiig vonrehinen. 

4 Proernmme lur (.tPC-Pronv int Pukel: Kiwl.-Nr. 2115 . 1)\1 59 ,-v 


Seil seinem Eiwhcmcn 198 f>isl dieses Schrcibprogrammtüt den CPC 
Viele lausend Mul verkauft woiden. Die Uinselz.ung auf'den PC fand 
inzwischen sogar scthsMcIlige Ö«nuizerz-a!ik-n Kein Wunder: Con- 
Tcxl ist ein simples Programm, ohne Schnörkel und unnötige Koinpli- 
z.ienbeilen Man kummi schnell damit klarundcrreichl dtisZkl - die 
tRgiichc Schrcibarbcil ni veremfachen — ohne Umwege. Es i.-a ein 
Piograntm. das in erster Linie mehl <lcn "Freak" und Spezndisicn, 
soculem den Praktiker onspnchi. Den Studenten, der seine Refciaie 
ohne Tipttfchlcr ahgeben ndichle. Den Pfairer. der seine Predigienl- 
wUrlc sauber und wiedcivcrwendbar abspeichcni lind arehivicrcn 
mlkthie. Den NtneinsviirsUnd, der das neue Jtiiresiiiogrumm aushjngs. 
reif zu Papier bringen wir. lind naidrlK-h den Programmierer, der zu 
reinem Werk eine ansprechende nmigul lesbare Dnkiimcniuiion liefern 
möchte. Also: Man konnte sagen, daß ConTcsi so etwas wie der 
"Küfer” umerden Teslprogrtimmcn isl —eslaiill und liiullunil Ibuft... 

Dali die Darstellung der Texte darüber hinaus auch noch besonders 
ansprechend ist und alle Pnigrdimnfuiikikiocn erfreulich flott arbeiten. 
is 4 das VerdienM des Pi-ografntnaulors M.iilhins l.pliotT, der sich auch 
diireh .wdere Ihsijcklc (''Cispy-Shoii", "das Sofissaic-Experiincni 'i 
emen Namen mder CPC-Szencgeinjelu hat. 


Mil COiiTcai CPC maeln das- Schreiben nchlig .Spall 

B Einldgcii. Flieüleau RliickliiniiMKM'iing und Kopa-ieii .ml 
TasKiidruck 

B 2.1 kByie TcslsiKielivr.ausreichciid lüi iniiHtcMens lunIDIN 
A 4 -Seitcn 

B Mehrspaltige Tcvic und Kopieren liii KtsoiKicrc AnlgaK'ii 

B TeslhUicktf von Diskclle oder Kavselle n.ichladliar iilid lerk'i- 
zeii im Text zu pla/.icren 

B Drucken Im Himergraird. wilhreiHl Sie weilet .m llucii l'eMeii 
atbeiicn 

B Eehlblld-DnrMcIlung der Schi iliBilen VcrgriMkMi und 
Untci'sit teilen 

B Ins ToMprogramtn iniegrieilci TusclK'iirechiici und Kiiloxtci 

B Vaiiahle DriiLkciunisKsung mil EiiislcIliiiögliLlikoi >i ’laliel 
Icnform 

B WordSiar-kompalihlc l.isialiirkommaiskrs lin den len-lilcii 
Umslicg 

«esI.-Nr. 207 . DM 59 ..* 




























































Jetzt exklusiv zum Lächel-Preis beim DMV 


Wie wär’s denn damit: 


The Pliiyer's Dreani Vol. 3 

Eine Sammlung besonders altrakliver Spiele, pro¬ 
fessionell programmien und mit iletailreicher Gra¬ 
fik ausgestauel- BesI.-Nr. 194. DM 19,-* 

RUliT Kunibert; Einesdet wir/ig«enReakü<in»spielc rurdcnCPt', 
tcmpogeladen und mit ileiailrckhcr (■aibgraJlk. Vfethcll'eii Sic Kuni¬ 
bert datru. Spnjiig fUr Spmng die Burg seines EiTfcinds TM Hürmcn. 
Vorsichi; dwscs Spiel matln siSchiijil 

1‘unik im l.nb.vrinih [Uwas für Freunde gepllcgm’ l-tckiik. Milten 
In einem Rktcnlabyruiih mit hcivriTappcIndeii und umhcrwitchen- 
den Encrgieftessem erwacht Ihre Spieingur Und jeia gilt es. ein 


knappes Dutzend Schlösser zu linden, Das Spiel heslichl durch 
blH/schnclle Bildwecltse! und seidenweiche Joystick-Sleucnmg. 
BulldiMcr: Eine pfifl'igeMisehungau»"Pae-\tin "utKl”Soko-Bair, 
mit liebevoll geslnlttier OiurKtcr-CiTarik. 

Froggii- •Tierisches" Juinp'ii-Run-Spic) mit Horizonul-Scmllirig. 
Für 1 iKler 2 Spieler simuliaa. 

Sort-Hall: Ein Flipfiermit -zig verschiedenen, znckigeii Geräuschen 
— lur alle, denen Arrt oder Ehelrau den Besuch der Kneipe an der 
Ecke verboten haben. 

Ron- .Inoes: Ein giaEscIi aufgepcpplcs Börsenspiel im EDV-Milieu. 
Kaufen Sie Altm, [BMixlei Amaoad — machen Sic Millionen oder 
verlieren Sk H.sus und Hof, 


Personlichkeilslesl Opliwli gelungene "Selbstaii^yse'' für den 
kleinen Psychologen. Niehl ganz cmsigcmcim. macht aber Spaß. 

Skai: Eines der raren Skatprugramme. Fchleii der zweite und dritte 
Mann fiir eine zUnllige Partie? Dieses Programm hilft aus. .Aufwen¬ 
dige FaThgiufik. 

Mcmnli-nn: Die schünsic ••Mentoiy"-VcrsKn. die cs je aul einem 
K-Bil-Compiilcr gegeben liai. Sie spielen .simullon gegen den Com¬ 
puter oder einen incnschlichcn Gegner und können das gegnerische 
Spiel durch Ihre eigenen SpielzUge inanipuhetcri, Gutes OcdSchinls 
und Reakiicin werden so gleichermaßen trainiert. 

y.Bert 2: Nene Version ilcs licben-swerten klassischen Perspektiv- 
Hilplspicls. Viel Fcnd, viel Ehr. 


The Player’s Dreaiii Vol. 6 

Ein Pakul besonders anspmchsvoller Spiclpro- 
grammc.dienie langweilig werden — mal fioltund 
kernig, mal tüftelintcnsiv, Bcst.-Nr. 195. DM 19.-* 

Suko-Ban Conslnicloe Eine lleniusfoidening für Ihre kleinen 
grauen Zellen. Finden Sie die richtige VorgeUenswei« lür Jedes 
Spicllcvcl. Mil Bildschinii-Ediior zum Gettallcn und Ahspcichcm 
eigener Levcis. FUnfLcveU werden milgelKfcit, Achtung: ahsolutes 
Sliehlspiel. der Effekt ist ••Leiiunings"-älinlichl 

Air Traffk Coolrol: Koordinieren Sie ikn l.uftverkehr zwischen 
ochl europäischen Flughbfen' Verhindern Sic Zusammenstölk, In- 
ilcm Sie den Piloten dk riehligen Infomiaiiuiieii geben. AiifregeiKk 
Siniulaüoii im üialikmotle 2. 

Trouble In Space. Slislegie und Tempo in einem faszinierenden 
Spiel vereint, fiter wkd nicht ichallerl, somlem niii ktililem Kopf 


eine Bahn für einen Spuce-SetHaer gebaut. Sehr hohe Spiclmoilva- 
lion. dclailrciclie Gralik Mit Levcl-Edilor. 

Super RiihikN l'ube: Der berühmte "Zaiibcrwürter auf dem CPC- 
Diktwhinii MitSpicgclnfilr die vcrdccklcnWUrfelseilcn. Für Freun¬ 
de vcizwickier Kombination. 

Alien AlUck' Auch das kl,ns.slsche Balkrspiel für die Arbeilspause 
darf nkhl fehlen Dksc ‘‘Space Invarter»“-Version überzeugt durch 
ihre liebevollgcsialieieGrafik 

OBt. 'Ibmporckhcs, "Facman '-tiniges Aciioospiel mit niedlich .-uii- 
nncrier. hulterwcichcr Spnte-flturik und vielen, vielen Monstern. 

Dullus Oil: ManagcnienKicsellschafisspicl für bis tu 4 Personen. 
Reizvoll durch ineinander veiMihachkrllc IVnosaklioncn. 

Rvparulur: Flottes Takiik-und AclKU>-S|iieI mit fuibiger Characier- 
Grafik, Bchcmchcn Sie das SchlaclMfeld? 

(iardner-Spkl Knmhmuiioii ist ungesagt bet diesem Spkl mit 
Vektoren, Dusgonalc. senk- ixler waageibchks Reihen von Steinen 
wenlcn aufeineniSpielfeld maiupulien. I-!jwus fllrTUftkr. 


Puzzle — 
make il! 

Neun verschiedene 
Schiebe-Puz?.le.s 
zum Enlspannen; 
von den “Ghosi- 
busters” über Co¬ 
nan und Obelix bis 
hin ziim Madoiina- 
Ponräc. 

255 Schwierigkeits-Stufen. Testen Sie Ihre Vor¬ 
stellungskraft! BesI.-Nr. 196. DM 15.-* 



Codex Vol. 5 

Ein Anwenderpakei für kühle Rechnerund Freunde 
des geschriebenen Wortes. Best.-Nr.265. DM 19,-* 

tVxImoker' Ein einfaclies Tcslvcraibeiiungsprogramm zum Briefe¬ 
schreiben. Briefkopf gcsumlerlcrfaiaiar. Blocksaiz. Datei-Mwuger, 
cmslcllbarer Tabulator. Zeilcnbrenc Ks 72 Zeichen Deutsche 
Schreibmaschinen-Tasialurbelegung mit OIN-Zeichensalz. Bnsic- 
Programmkrer kOiuicn die Routinen für deuuehe Umlaute und S 
aujJrqipeln und in ihre eigenen Programme einhinden. 
Papermaker' Ein Mini-DTP-PiOgranim fdr die Schüler- txlcr Ver- 
emszeitung. .Mehrspaltiger tbzl.Schlagzeikii und Zeilungskopf la-s- 
sen sieh frei auf dei- Seite plazieren. F-infachc Gcomelricgrafik für 
Zciluiigskopf, Köpfe. Schlagzeilen und Artikel getrennt spcichcitw. 
Ausgabe für Epson-kompanblc Drucker. MiieinerDemo-Zciiung »b. 
Beispiel, 


Typograph: .Mit diesem Pmgnunin eiKwerlcn und verarbeken Sie 
Crarikschriflcn auf dem RikKhirni. Per eingebauter Hardcopyrou- 
lirw Ußl sich dk -Schrifikunsl auch 
zu Papier brrngen, Freies Skaikren 
und Posiilcmkren der Schnltzei- 
chen. Em kompleuer Font im "Wc- 
sIcm-Look'' wirrt milgeliefen — 
damit Sie gleich loakgen können. 


Ruehuniul: Nbrwaliimg all 
Baus mit allem Komfon. 


TKE IKWECIIDCi 


*CD' 


ffft jnA UD$9^vnd»ii 


Mullilruiiier: Ein komforable* 
Lern-. Ubiings- und Tesi-Pixi- 
gramm für beliebige Mullipk- 
Choice-Aufgahen 
hcispielswcisc FUhrerscheinfragen. 
Prufungsaufgaben. Chcckltslcn 
Otter Psyclio-Tesls. Ergebnisproto- 
külle speiclictbar, Zcllrahtncnüher- 
prtifung eingebaut. 


HUND HT .OT|EINE^ N^ES DT^PROGi™ 






FREIBIER F.4UIPELZEENTHSHT HINDSTAGE 






-r privaten FmBnzen uuf kaufmSiuitscher 
Kompleiie Übersicht über Aktiva und 
Passiva. Koiileiir.ihnienmitinsgesam 
2b Konten - auch Wenpapkre und 
Optionen, Steuern. Ciebühren. Ab¬ 
schreibungen und Zinwn werden er¬ 
faßt. Jahresabschluß, Druckeiausgahc 
lUrCesüim-und Vcnnögensübcrsichi 

lluushulLsbiluiu: Erfassen Sir Ihre 
laufenden zkusgaben und xicllcn Sie 
fest, in welchen HercKhen die Koslen- 
lawine am schlimmsten wüici. Über- 
saihlliche Tabcllendarsiellung, 
hliizschneller t^bcrblick Ubei die fi- 
naiizieilc Situation im l.iufcnden Mn- 
iiut. Kiiideikichie Menlisteucrung. 
Divekerausgahe. 




(’odex Vol. 6 

Eine besonders anspruchsvolle Sammlung hilfrei¬ 
cher Anwendungen für verschiedene l.el>enslagcn- 
Best.-Nr. 266, DM 19,.* 


DiakcKriMysicm Die langgevuchic 
■‘eieikgcndc Wrtlmilchsau". Vondeii 
Slaiid.srd-lJaki-Opcnitionen fForma- 
Heren, Kopieren, Directoiy-Manipu- 
laiionent bis hm zum Diskciien- 
üpliinierer, Filc-Reakiivicrcr und Re- 
lokaior istallescingchaul. Eine W’eik- 
bank Ihr die lügliche Arbeit roll 
Disketten und Dateien Ein eigenes 
Benutzermenti IdSl sich einklinkcn — 
eine Overlay-Dalel mit entspn-rhrn 
der SchniusKllc i« dabei 


Plaline-Müstcr: Ein sehr uufwendi- 
ges Programm zur Geslnliung von 
Leiurpkilten. Joyslick-Bcdienung 
mit Icons.Fadcnkrciucuixor, Masken 
für IC-F'assungen auf Abiul, Be¬ 
schriftung. Kopieren von Bereichen, 
abschahhures Hilfsrasler Dmekaus- 
gäbe in zwei Großen. 


I'rnninkalcnder: Speichen fhi jeden Tag einen Teslbildachirm. 
Auch rur Tagebuch oder BcsucbspnbtAolle geeignet. Mciiilgrsleu- 
cn. mit iteuiwhen Umlaiilcn, Dnickerauvgabe. zalilreiclicn Ediior- 
funklioiien. Hilfcbildschirm. 

Magk .S.vntlicsizer: Hilll- 
kurven und ronsdiwcbun- 
gen erzeugen für ausgefeilte 
Sounds iiiii dem Soundchip 
rtca CPU. Crafisclic Darstel¬ 
lung der Hllllkurvcn..Schrill- 
rar-Sclteill'Edilicren durch 
numerische Eingabe mög- 


ProaranHsanHlung 

Deir Da.‘t.erb9-ek.)r'te’in 

nit der züsHzlidien Portion 


eferauchsiiutzwer 


3-Zoll'Diskette ivuoifeuMfUt 


BJtMItJOS 

aMf 


UOA s-^sea 




-nna 


e T a 


lieh. Erzeugt Basic-Code filrdie Verwe-ndung der .Sounds in eigcnco 
Programmen Demo-Melodie zum .Ausicslen eingebaut. 

Fußball-Verwaltung: Von der Guiidc.-digubis zur zweiten Kreisklav- 
sc —dieses sehr umfangreiche Programm verw altet alle Fußhaller- 
gebiiisM; komfiinabel und erkichicn Tippem dk UberMchi. Free 
Eingabe und Abspcichcm von l.igen und SpielplSiien. Das Pru- 
grarrun Ubcririgl dk cinTclnen Paarungen in dk Ergebniscingabc. 
Die Tabellen lassen sich an/eigen und auf dem Drucker uusgeben. 
Umfangreiche siali-sUsche Auswertung. 

Uollo-Uommandcr- Erlaubt dar .-kufuellung und Ocwiraikonlrolte 
jeweils eines .Service-Scheins der Spklc ”6 aus 49" und "Spkl 7T 
für mehrere Wochen (besonders prcHglinsligc Tippmeihode). 



DUkettenhüllen-Driickrr Druckt InliaUsvcr 
zeichnis.Archivmiminer und Dutiun auf Hullen 
llir .f-ZdII-Diskeilen Rlt Epson-kompabhlc 
Drucker. 

Aufkleber-Edilnr: Zur Hmiellung professio¬ 
neller. ktehefeniger Bikelien für S-Zoll-Div 
keilen. Sehr aufwendig aufgcm.-ichl: 'Whal you 
sec IS what you get", fvll-. Kursiv-, Mager- 
schriA. doppelt hnlic, hreile. unterstrichene und 
kopfstehende Schrift. Olcichzeilige Verwen¬ 
dung von 3 TleiclieMstuzen möglich. Mit cinge- 
houtem ZekhensaK-Edilor Für Hpson- 
kompRliblc Drucker 
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Die Power-Software von CPC Am- 
strad für CPC und PCW Joyce ist 
unter Kennern bereits ein Begriff, 
und unser Sortiment wird Monat 
für Monat gepflegt und erweitert. 
Und vergessen Sie nicht: Soft¬ 
ware von CPC Amstrad ist auch 
ein Geschenk, das ankommt. Nut¬ 
zen auch Sie die Vorteile von 
CPC-Amstrad-Software 

• preisgünstig 

• bewährt 

• praxisgetestet 

Zur Erinnerung: 

Meine CPC- und PCW-Joyce-Soft- 
ware wurde bestellt am 



CPC-Amstrad-Leser sind immer 
top-informiert. Daher sollte Ihnen 
kein Heft oder Sonderheft in Ihrer 
Sammlung fehlen. Das Eintippen 
von Listings und Programmen er¬ 
sparen Sie sich durch unseren 
günstigen DATABOX-Service. Im¬ 
mer gut beraten sind Sie mit CPC 
Amstrad 

• Sonderheften 

• DATABOXEN 


• Sammelpacks 

Zur Erinnerung: 

Meine Hefte, Sonderhefte und DATA¬ 
BOXEN wurden bestellt am 



Alle 2Monate bietet Ihnen CPC 
International aktuelle Informatio¬ 
nen zu CPC und Joyce. Nutzen 
Sie dieses Wissen mit einem Ab¬ 
onnement zu Ihrem ganz persön¬ 
lichen 

• Preisvorteil 

• Informationsvorsprung 

• Zustellkomfort 

Zur Erinnerung: 

Mein persönliches Abonnement wur¬ 
de bestellt am 


widerrufsrecht - 

Ich weis, daS Ich diese Vereinbarung innerhalb ei¬ 
ner Woche beim DMV-Varlag, Poslfaw 2S0, W-3440 
Eschwege, schriftlich widerrufen Icann, wobei bereits 
die rechtzeitige Absendung des Widerrufschreibens 
zur Frislwahrung ausretchi. 
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221 

Volume 6, Tabellenkalkulation 

59,- 

_ 

□ 

222 

Volume 7, Grafische Benutzeroberfläche 

69,- 

- 

□ 

194 

The Player’s Dream Vol. 3 

19,- 

— 

□ 

195 

The Player's Dream Vol. 6 

19.- 


O 

265 

Codex Vol. 5 

19.- 


□ 

266 

Codex Vol. 6 

19,- 


□ 

269 

CPC-Highlights I 

49,- 


□ 

270 

CPC-Hlghllghts II 

49,- 

- 



Anwender-Spiele 


- 

□ 

193 

Joyce Highlights I 

29,- 

- 

□ 

264 

Joyce Highlights II 

29,- 


M Gesamtbetrao: hM 


CPC-Sonderheft 
DM 14,- 

DATABOX 

S-Zoll-OlsXelte 

Kombipack 

Sonderheft + DATABOX 
3-Zolt-Di$ketle DM 29, - 

□ 309 Nr. 3/86 

□ 3/9 DM 29.- 

O 3044 

Nr. 5/87 

□ 334 DM 38, - 

Heft ausverkauft 

□ 312 Nr. 6/88 

□ 340 DM 38. - 

□ 3046 

□ 313 Nr. 7/88 

□ 313S DM 36,- 

O 3047 

Nr. 8/89 

□ 3142 DM 38,- 

Heft ausverkauft 


Sammelordner CPC 


C 531 CPC International 


Lösungsansätze, 
Programmierhilfen 
und Anwendungsbeispiele, 
die immer 
aktuell bleiben. 


äesamtbetrag: ^ DM 


yce-Databox 

isgaben als □ Cassötte □ Diskette 3" 

g) 

12 Ausgaben 180,- DM 
12 Ausgaben 300,- DM 
jropäisch) 

•A. 12 Ausg. 200,- (240,-) DM 
A, 12 Ausg. 320,- (360,-) DM 
)abe. 

ichung 



Wochen nach Erhalt. (Bitte keine Vorauszah- 



derjährigen des gesetzlichen Vertreters) 

eite eine Unterschrift leisten! 



















































































eAfsue^lO-siejci 


Das Beste von RE-Software: 
Ausgewählte und geprüfte Qualitäts-! 


Jetzt exklusiv zum Lächel-Preis l 

Wie wär’s denn damit: 


The Player's Dream Vol. 3 

Eine Süinmlung besonders atlrakliver Spiele, pro¬ 
fessionell programmiert und mit delaiircicher Gra¬ 
fik ausgestailet. Bcsl.-Nr. 194, DM 

RKUTKunOMrt: Eines der wir?,igscen RcaklionsspiclefilriJiin CPC, 
rempogelaJen und mil dclailrcKhcr Fa(bgi'a(ik. Verliell'en Sic Kuiti- 
ben (kzu. Spiuiip ffir Sprung die Burg seine» Eivfeinita zu siUnncn. 
Vorachl: dieses Spiel moclu sUchilg! 

Panik im l^ahyrinlh: Elwas fOr rieutide ^pflegier Hektik. Milk'n 
ineitiein Riesenlabynnlh mil lieruniznpi»Iiidcn und umhcrwischcn- 
den Encrgic(TC».scni erwacht Ihn: Spiclfigur. Und Jetzt itili es. ein 


knnpjKS Dutzend SclilOsser zu finden. D.-i 
blil/schncilc Bildwechscl und seidenweiche 
liuildozer Eine pliffige Mischung au» "Pze- 
inil IlebcvcdlgcsialteterCharacier-Gtalik. 

l-'roggie: "Tierisches'’Jump'n-Run-Spiel m 
Pilr I oder 2 Spieler simulinn. 

Son-ilall: Ein Flipper mit -zig verschicdenei 
— für alle, ilencn Arzt oder Eliefrau den Be 
Ecke veitioien haben, 

Dow Jiincrtt Ein gruJisch uul^pcpple» Bdr« 
Kaufen Sie Atnri, IßM uderAmstrad — ma 
vcrIicTcn Sie Hiiu» uttd Hof. 


The Player’s Dream Vol. 6 
Ein P,Tkel bc-sonders anspruchsvoller Spielpro- 
grainmc, die nie langweilig werden — mal fioH und 
kernig, mal lilftelinicnsiv, Best.-Nr. 195, ÜM I9,> 

Soho-Bnii Construclor: Eine Herauslordcning l\Jr Ihre kleinen 
grauen Zellen. Finden Sie die richtige Wrgehenswene fUr jede» 
Spiellevel. Mit Blldschinn-Editcr zum Gciaaticn und Abrpcichcm 
ergeocr Levcls. Fünf Level» weiden milgeliefcri. Achtung: absolule» 
Suchltpiel. der Effekt Hl ■■Lcnnnirg>«"-Iümlicli! 

Air Trnflic Control Koordinieren Sie den l.uftverkehr zwischen 
acht europäischen riughnfcii! kbiblndeni Sic Zus.unmenslüUc. In¬ 
dem Sieden Piloten die richtigen Infonniuiuncn geben. Aufregende 
Simulation lin Cnifikniodc Z 

Triiuble in Space: Sualegie und Tempo in einem fuzlnlerenden 
Spiel vcrcinl. Hier wird nichl gcbaüen, sondern mil kühlem Kopf 


eine Bahn ft)r einen Space-Scooier gebaul. I 
lion. delailreicheGrank. Mli l.cvcl-EdlIor. 

Super Kubih'» Cube: Der bciilhmie "Zaub« 
Hiklscliirm. Mit Spiegeln lür die verdeckten' 
de verzwiekter Kombinalinn. 

Allen AlUek: Auch daskla-sMSche Baller»p 
darf mehl fehlen. Diese "Space lnvadcni''-\ 
ihre lichevtill gptlullcic Grafik 

Oik; Tcmporcichcs, "Paonim''-[uliges Acli« 
miertcr. huttcrwcicher Sprile-Giafik und vie 

Dali»» Oll: MBnogcmenl-Gescllachnitsspiel 
Rci/v<tll durch incintindcr veisdiachielie Tr 

Reparator: Rulles Taklik-und Actiini-.SpicI 
Grufik. Beherrschen Sic da» Sclilachifeld? 

Gardner-Spiel. Kombln.Hiun i»l angcsigl 
Veklorcn. l)i.igon.Hlc. senk- oder waagerecl 
werden aufeineni Spielfeld nunlpiiltcn. Elt 


Codex Vol. 5 

Ein Anwenderpaket für kühle Rechner und Freunde 
des geschriebenen Wortes, Best.-Nr. 265, DM 19,-* 

Ikxtmaker; EineiafBchcsTostverarbeiiungsfrogriKnm zum Briefe 
schreiben. Bnefkopf gesondert erfaShar. Dlocksai/, Dalei-Maruiger. 
eiiisiellbater Tabulalor. Zeilenbieiie bis 72 Zeichen. Deutsche 
Schreibmaschincn-TaMaiurbeleguiig iiill DIN-Zctchensai/. B»iic- 
Programmierer können die Rouilncn ftir deutsche Umlaute und li 
auskoppeln und In ihre eigenen Programme einblnden. 

Papermaker: Ein Mini-DTP-Programm für die .Schiller- oder Ver- 
einszeiiung. Mehnspattiger Text. Schlagzeilen und Zeiiungxknpf las¬ 
sen »ich frei uuf der Sene pla/icrvii. Einfache Ccomciriegtarik für 
Zciiungskopf. Kopfe. Schlag/oilen und Artikel gcircnni "^iclieibar. 
Ausgabe für Epsim-kompalihle Dnicker. Mil einer Demo-Zeiuing als 
Beispiel, 


l'ypugruph. Mil diesem Progtumm cnlwcr 
CrankschriDcn auf dein Bildschirm. Per eir 
line Ibiii sich die Schnfikiinsi auch 
zu Papier bringen. Freies Skalieren 
und Rj.sitionlereii der Schriflnti- 
chen. Ein kon^leilcrPonl ^''^le- 
sIcm-Look" wird iiiiigcliefert — O"*' 

damit Sic gleich loslcgen können. 


Mullilruiner Ein kumfuruMcs 
I.em-, Cihiings- und Tcsi-Pna- 
gramm Itir beliebige Muhiple- 
Clioice-Aufgabcn — 

beispiclswcixe Flihrcrsfheinfmgcn, 
PnlfuctgSDufgtAen. Clieeklisien 
oder Psycho-Tesi». Ergebnisproio- 
koltc speicherbar, Zeiirahiiienbber- 
prOfung eingebaut. 


Codex Vol. 6 

Eine besonders anspruchsvolle Sammlung hilfrei¬ 
cher Anwendungen für verschiedene I-elienslagen. 

Be.st..Nr.266, DM 19.-* 


FRE 


Disiicllentyslem: Die langgcsuchtr 
■'cierlegcndcWoIlimlchi.uu". Skjnden 
Stand ard-D«ri'(7peralionen (Fontu- 
licren. Kupieren, Direcloty-Manipii- 
lalKincn) bis hin zum Diskelien- 
oplimicrer, Filc-Reakliviereruntl Rc- 
lokaior ist alles eingebaut. Eine Wrrk- 
bank iXlr die lüglichc Arbeit mil 
Diskellcn und Dateien. Ein eigene» 
BenuUcrmeiHl IliIhMCheinklinken — 
eine Overlay-Daiei mil entsprechen - 
der Schninstelle ist dahei. 


Ilallne-Masler: Ein sehr aufwendi¬ 
ges Programm zur Gc-stahung von 
Leiterplulten. Joystick-Bedienung 
mit Icon», Fadenkreuzcursor, Masken 
Ihr IC-Pa«Hungen auf Abruf, Be- 
schriliung. Kopieren von Bereichen, 
abschaltbares tlilfsrasler. Iknickaus- 
gabc in zwei GiOBcn. 


ProsraHAsamilung 

Der* Da.1;en9a.ir^e-n 

iiit der zusatzliclien Portion 


ebrauchsnutzwer 


l'eniiinkalender: Speichen für jeden Taf 
Auch l'tir Tagebuch uder Bcsuchsproiokulh 
cn. mit deutschen Umlauten. Oruckerausg. 
funkiionen, Hilfebtkt»chitm. 

Ma, 
kurv 
gm 
Soul 
des ’ 
lung 
rur-J 
iium 


7!ou 


-Piskette leuoi^euM^ui p j 


Bjwnjos 

StH 


uor^ 


-nwa 


® T 0[ 



Software 

für 

CPC und PCW Joyce 

erwerben Sie im 

Bestellservice 

preisgünstig 

und 

schnell 



Information 

Über 

CPC und PCW Joyce 

sammeln Sie mit 

• Einzelheften 

• Sonderheften 

• DATABOX 


1 

RN ATIONAL | 

DAS ABO 

mit den vielen Vorteilen 

• Preisvorteil 

• Informations¬ 
vorsprung 

• Zustellkomfort 



ä 
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servi 


Jovce-B#steU>ervlce 


3“-Di8kett6 

Kassette 

DU 

3'-Diskette 

DM 

□ 

207 

- 

ConText CPC, Textverarbeitung 59,- 

□ 

215 

Volume 1, Charakter-Designer 

49,- 

□ 

262 


Der Finanz-Fachmann 

49,- 

□ 

216 

Volume 2. Datelverwaltung 

49,- 

□ 

202 

- 

CopyShop, Hardcopy-Programm 49,- 

□ 

217 


59,- 

□ 

267 


Lernen mit Spaß Nr. 1 

24,95 





□ 

266 


Lernen mit Spaß Nr. 2 

24,95 

□ 

219 

Volume 4, Bild-Editor 

49,- 

□ 

214 

- 

Turbo Data CPC 

69,- 

□ 

220 

Volume 5, Datenbank 

69,- 

□ 

205 

- 

Special Öfter 2 

59.- 

□ 

221 

Volume 6, Tabellenkalkulation 

59,- 

□ 

263 

_ 

Der Schlüssel im 









Maschinenraum 

49,- 

□ 

222 

Volume 7, Grafische Benutzeroberfläche 

69,- 

□ 

213 

- 

Software-Experiment 

39,- 

□ 

194 

The Player’s Dream Vol. 3 

19.- 

□ 

209 

- 

FaBaCom, Basic-Compiter 

49,- 

□ 

195 

The Player’s Dream Vol. 6 

19,- 

□ 

104 


Startest 

19,- 





□ 

196 


Puzzle - make It 

15,- 

□ 

265 

Codex Vol. 5 

19,- 

□ 

1011 

- 

Fantastic Four, Spielesammlung 

□ 

266 

Codex Vol. 6 

19,- 





29,- 





□ 

107 

- 

Special Offer 3, Spieiesammlung 

□ 

269 

CPC-Hlghlights 1 

49,- 





3», - 

□ 

270 

CPC-Highlights II 

49,- 

□ 

1369 

- 

Faszination 3D 

39,- 





□ 

1012 

- 

Game-Box III 

29,- 



Anwender-Spiele 


□ 

106 

- 

Know CPC 

29,- 

O 

193 

Joyce Highlights 1 

29,- 

□ 

211 

- 

Fraktal Generator 30 CPC 

49,- 

D 

264 

Joyce Highlights II 

29,- 


Porto/Verpackung 

(Inland 4,- DM. Ausland 8.- DM) _ DM Gesamtbetrag: DM 


feinzaiHttn» uncT OATABOX 

Sonderheft und DATABOX 

Elnzelheft 

Ausgabe 

6.- DM/Stdc 

CPC 
Kassette 
14,- DM/Slck. 

CPC 

3‘-Dlsitette 
24.- DM/Stck. 

CPC 

S 1/4'-D[sketle 
21,- OM/Stck. 

Joyce 
3‘-DlskettB 
24,- OM/Stck. 

CPC-Sonderheft 
OM 14.- 

OATABOX 

3-Zoll-Dlskette 

Kombipack 

Sonderhafl + DATABOX 
3-Zoll-Dl9ketta OM 29.- 

□ fSO 

□ 

O 

a 

O 

□ 309 Nr. 3/86 

□ 3/9 DM 29.- 

□ 3044 






Nr. 5/87 

□ 334 DM 38.- 

Heit ausverkauft 

□ 2’90 

□ 

□ 

a 

n 

□ 312 Nr. 6/88 

□ 343 DM 38.- 

O 3046 

□ 3'eo 

D 




□ 313 Nr. 7/88 

□ 3135 OM 38,- 

D 3047 




Nr. e/89 

□ 3/42 OM 38,- 

Haft ausverkautt 

□ 4'eo 

□ 

□ 

D 

□ 




□ S’90 

□ 

□ 

a 

a 


bammeioraner uku 

□ 6/7'90 

- 

□ 

a 

□ 




□ 8/9'90 

- 

□ 

□ 

o 




□ 10/1V90 

□ 

0 

□ 

□ 

Lösungsansätze, 

□ 12/1'90/91 

Q 

□ 

□ 

□ 

Programmierhilfen 

D 2/3’91 

□ 

□ 

□ 

D 

und Anwendungsbeispiele, 

□ 6/7'91 

D 

□ 

□ 

a 


die immer 

C 12/1'91/»2 

□ 

O 

□ 

□ 

aktuell bleiben. 

C 2/3’92 

□ 

□ 

□ 

□ 




+ PortoA/erpackung 
(Inland 4,- DM. Ausland 6. 

- nMi 


DM 

Gesamtbetrag: 


DM 


_ Abo-Ord0r D/OABOX _ 

Hiermit bestelle ich die □ CPC-Databox □ Joyce-Databox 

für mindestens □ 12 Ausgaben □ 6 Ausgaben als □ Cassette □ Diskette 3" 
Bezugspreise Inland (einschl. PortoyVerpackung) 

Cass. 6 Ausgaben 90,- DM, 12 Ausgaben 180,- DM 

Disk 3“ 6 Ausgaben ISO,- DM, 12 Ausgaben 300,- DM 

Bezugspreise Ausland (eingekl. Werte außereuropäisch) 

Cass, 6 Ausg. 100,- (120,-) DM, 12 Ausg. 200,- (240,-) DM 

Disk 3“ 6 Ausg. 160,- (180,-) DM. 12 Ausg. 320,- (360,-) DM 

Lieferung erfolgt ab der nächsterreichbaren Ausgabe. 

□ Bequem und bargeldlos durch Bankabbuchung 


BanKleRzahl 


Konto-Nr,/-Inhaber 


Geldinstitut 

□ Gegen Rechnung - zahlbar innerhalb zwei Wochen nach Erhalt. (Bitte keine Vorauszah¬ 
lung leisten — Rechnung abwarten.) 


Daturn 1. Überschrift (bei MlnderjShrlgen das geseUllchen Vertreters) 

Bitte unbedingt auf der Vorderseite eine Unterschrift leisten! 



I ( 664 /fil 2 ») 
df m CHC laiifititiis 
rilcn lllr NiifhliKli.T*<i 


:h «ir C'PC 464 
minn-Ariiltmclik 
hlicUlich KAM-hisl. 
'ckci'hlngc-miui wi'tilcii 
iplcifxoiu'actimc 




nblor 

Mer 

Ic nirdeii .Speichel 
BiliLwhimiiiuspjhe 
I H"; Linken, Vfersehic- 
menl 


ft.t.DMn-* 


















































































Joyce Preis-Offensive 


0 

Tj 

0 


Das Bes 
Ausgew 


Jetzt ex. 

Wie wär’s ( 

The Player’s I 

Eine Sammlung be 
fessionell programi 
fik ausgcstadct. Be: 

Riilcr Kuniherl; Ein» ik 
tcinpogcindcn und mil dcl 
bcrt da/u. Spmiig fUr 5pn 
VoTMchi; difses Spiel moc 

P-jnik Im Lubvrinlh: I5lv 
in einem Kieieniadynrah i 
den Bncrgief(»5cm cfv.'a 


The Player’s i: 

Ein Paket besond 
gramme. die nie Jan 
kernig, mal tüflelinl 

Sflkn-Ksn l'oo'ilruclur. 
grauen TIellm. rinden Si 
Splellevel. Mii Bildschim 
eigener Levchi. FUnFLeve 
Suchlspiel.dcrErTckl i«l' 

Air Tranic Cnnlrol: Kex 
achl ciinapiliKhen Fliighd 
dem Sieden Filmen die rk 
Simulaliun im Cnfikiiiudi 



CPC-/PCW-Joyce-Bestellservlce 

Ja I Ich mache von Ihrem Angeöot Gebrauch und bestelle die umseitig 
sjsgewählten Produkte. Bitte liefern Sie an folgende Anschrift; 


Name 


Straße/Postfach 


PLZ/ORT 

□ Oen Betrag bezahle Ich mit dem beigefüglen Verrechnungsscheck. 

□ Ich bitte um Lieferung per Nachnahme zuzQgllch der Nachn^megebQhr 
(nur Innerhalb der BRD). 

Oshim UniwscHrlH (bei MlnderjShrTgen des geaeizlk^n Vertreters) 



Einzelhefte 


Jdy 


Ich mache von Ihrem Angebot Gebrauch und bestelle die umseitig 
ausgewählten Produkte. Bitte ilefam Sie an folgende Anschrift: 


tFoubk' in Spocc: Soaie Name 
Spiel vettim. Hier wird n 



Codex Vol. 5 

Ein Anwenderpakei 
des geschriebenen V 

TVsIniuker' Ein einfaches 
lichniibcn. BrielkupfgcsDi 
etmicllbarer Tabulnior. • 
Schceibmasuhincii-Tasialu 
Prpgranimiercr kennen di 
auskoppcin und in Ihre cig 

Papermakvr Ein Mini-C 
eimzeiiung. Mehrrrpalllgci 
svn sich frei aut der Seile 
Zeitungskupf. Kdpfe. Schl 
.Ausgabe rtir Epnn-kump! 
Beispiel. 


Codex Vol. 6 

Eine besonders ans 
eher Anwendungen 
Best.-Nr. 266. DM 

DiiheKensysIete: Die lai 
'eicrlcgcndeWollrntlchsix 
SiondanJ-Diuei-Opcruliaa 
licren. Kopieren. Dirccior 
lUioiKn) Ut bin rum 
nplimierer, Ftle-Rcaküviei 
lokittor ist alles cingelxiul. 
bank lUr die laglichc . 
Diskciicn und Dateien. E 
Benuuermend IdSi sich etr 
eine Overlay-D-tici mil er 
der Schniiisiclle ita dabei. 


Straße/Postfach 


PLZ/ORT 

□ Den Betrag bezahle Ich mil dem belgelügien Verrechnungsscheck. 

□ Ich bitte um Lieferung per Nachnahme zuzQglich dar Nachnahmegebühr 
(nur innerhalb der BRD). 

Onum Untersohrlh (bei Minderjährigen dee geaeizllchen Vertreters) 



Abo-Order DATABOX 

Rechnungsanschrift 


Vorname, Name 


Bitte 

ausreichend 

frankieren 


Rückantwort 


DMV-Verlag 
CPC International 
Postfach 250 

W-3440 Eschwege 


Bitte 

ausreichend 

frankieren 


Rückantwort 


DMV-Verlag 
CPC International 
Postfach 250 

W-3440 Eschwege 


Bitte 

ausreichend 

frankieren 


Rückantwort 


i 

5 


I 

f 

l 


1 

1 

f 

i 


Plnliiw-VtHvIer’ Ein lehr 
ges Progremm zur (jcsii 
l.cilcrplsllcn. Jriyslick- 
mit Icom. Padenkreuzcuis 
für IC-Fassungen auf d 
sehriflung. Kopieren von 
abschakbaies Hilfsnistcr. 
gäbe in zwei CliCfen. 


Straße, Nr./Postfach 


PLZ/Ort 

_ _ Wfderrufsrecht _ 

Ich welB. daB ich diese Vereinbarurtg innerhalb einer Woche 
beim DMV-Verlag. Postfach 250. W-3440 Eschwege. schriftlich 
widerrufen kann, wobei bereits die rechtzeitige Absendung mei¬ 
nes Widerrufschreibens zur Pristwahrung ausreicht, ich bestä¬ 
tige das durch meine zweite Unterschrift. 


DMV-Verlag 
CPC International 
Postfach 250 

W-3440 Eschwege 


Datum 


2. U nterSChlift Ibel MndBrjAIvt^fto <fe« QM9tzich«n Vefirafvrsj 













































FAst BAsic 
COMpiler 


Der 'rürbo-Antrieb für Ihre 
Basic-Programme! 

Hüben Sic sich schon immer (lewUnsclu. daß Ihre Bnsic-IVo^nirmne auf 
dem CPC' schneller laufen ! 

Mit ilcm FAIlA<!f)M-BiiiOe-(!«mni!cr winl dieser Wuiisell Wirklich- 
keu: Conipilierie Busic-PiDgraiiime brauchen weniger Platz und lauten 
schneller ab—weil sie niclilsiiiivtig den Basic-lnierprelcr als "K loiz am 
ßcin" mit dabei haben mdssn. SchUiun Sie den C!oik Ihrer Pmgraininc 
vor dem /niriff Neugieriger, indem Sie Maschinenprogramme dariius 
machen! 


B Milln Spracliumrimp von CPC-Uasic l.t 
B Die compillcrien Prugranune slndaur jedcin Clt' laufr.tfiig 
B Sepuculc Cunpilieruiig von Progranimicilcn liir Nnchladcpm- 
grwnnic 

B Fast alle Befehle von CPC Bicsie l.l nucli lUr m'4(i4 
B Unlersitlleung von Integer- und FlieUkoinnia-Arlilniiciik 
B Kompatibel zur VuileA-Penpheneeinsclilii'SlK'h KAM-Disk 
B Alle (’P/M-Dienstprosnimmc können weiicihiii gcnul/l weiden 
B Deutsclic Uedicnunpsanleilunp mul ßelspielpnigr.iiiniic 
Besl.-Nr. 20V, DM 49.-* 






für 

CPC 


Das belichte ''üchlrcnner"-Spi$l uus dem Film 'Troti” in 
einer holograpliischcn Version fUrzwei Pcisoncn! 


3D-Labyrinlh 


Fantastic Four 

Vier Superprogramme zum Minipreis 

Cockaigiie — WellraumAetion 

Terratvii» i 
Fruns 
Tenan/ulll 

BesL-Nr. I0ll,DM29,-» 


— Scieuce-Fictujii 

— Ocxchickllehkcii 

— Tcxladvenlure 


Special Offers III 

Neun Spielprogramine für alle CPCs 


Slan und der Zouhersiah 
Die Fymmide 
Fu:-Je 
Black Jack 


— Arcadc-Advenlurc 

— 'I'cslabcmeuer mit Aclion-BIcmtntcn 

— Zerstreuung für den hcicrahcnd . 

— das klassische Kartcnstnel 


Außerdem; Ortoii, Memoiy. Lahyhnlli. Zick-iCack. Slolotiifohti 
2 Diskelleii, BesL-Nr. 107, DM 39.-* 


3D*Llght Cytic 


Durch das Anaglyphen-Hnlograptiicverftdircn wacltscndtc 
LabynnlhwSnde i|uiisi aus dem BiliKchirm heraus. 

Rlr iille tTPC 4fi4. bM. 6128 mil harbmonilor, ''M>-I.ighl 
Cycle" kann in 2D-0arsiellung auchaufCii-ünmonilor ge¬ 
spielt werden. 

Beat.-Nr. I.1«9. DM 


StarTest 

Action-Adveniure für alle CPCs 

HCÄI.-Nr. 104, D.M 19,-* 


Zwei Super-Spiele mit zwei 31)- 
Brillen für Spielspaß zu zwei! 


(Jame Box 3 

l-ilr jeden das richligc — vier susgcsuchlcTt^J-SpicIc für CPC 
B Atpfujei: Woliraum-AcliunspicI mil lollcii EXIckten 
B l'elefiintiiniu: Science-Ficliun mit ganr neuer Spielidcc 
B Kampf den liwekien cricbnisrciebes GeschickllchkcilsspicI 

I Fimliouni'er: l-'arbcnfnihcs Spiel mil eigenem Bilil-Editnr 
Kea..Nr. 1012, DM 29,.* 


Der Schlüssel /.um Maschinenraum 

Ein CPC-Mega-Sampler, voll mil Werkzeugen 
für den Assemblcrprogrammicrer auf dem CPC 

Hier linden Sie die besten Tools aus sieben Jahren "l’C Iniematiunai" 
vom KSX-,Munagcr über den Spcichcr-Ucbuggcr bis zum kompletten 
Assembler, Oh Sie unter .AMSDO.S oder CP/M arbeiten — hier ist 
bcsunimi auch für Sic ciwasdabeudail Ihnen Zen und Mühe spuren hilfk 


Aus dem Inhall: 

B Mjcschincnspracbrmpnnor mil Disasscmblci 
B Kamdisk-Prognimm lllrOI2H in Assembler 
B Turbo-Rekscuior: das Otganisalioiisgcnie fQr den S|K'k.-her 
B "F.ASTM": Besclilcuniper (Ut Mwic-l BiklM.hirniaiispat>c 
B Ma.schkKnspraubc-l'lilhypakefT.;iurcl H”: l.inken. Versthie 
heil, Dokument iereii und RSX .Man.ipeiiK-iu 
B Utility fUr Pseudo-Mullilasking 
InseesDiiil Uber .U) Pfs^niiiiiiie. Best.-.Nr. 263. DM 49.-* 


CPC-Fraktal-(Jenerat»r 31) 

Vom V1aM:hinciiNpr«tcliü'Virluiiwn Mullliiuü Ir’phuff 

Rücbon Sjc Jen 7jtübcr mullKmuiisther/ougier LübdscUuflcn! 

■ Blii/sctaielle Otalik-Erzeugung; Der Frakul-Generaior CPC 
svurdc luUuisl effi/ieni In Assembler pnigmminlcn. Iniclligcnie 
Beivchnungs Roolincn sorgen l'Ur enorme Zcilenspumis, Sic 
können zuschauen, wdhiend sich die ttaklalcn Seen und Gebir¬ 
ge zUgig aulhuuen! 

B Mamlclbml- und Julumenge: mil uiionuiischer Gtkilungs- 
lunklioii 


B Slulenliiser venikulcr Blickwinkel; wahlweise Stuhl von oben. 

unten, kchrlg und In der Totalen cin/elii und siufcnlos cinsielfeai 
B Buc|ucmc Handhabung Uber Puikkiwn-McnUs mit deutscher Be- 
nutzerfUhiung 

Vier Bilder kbnncn beim 6128gtcichzeiiig Im Speicher gclialien werden. 
Die er/eugicn Bilder loxsen sich mit handcLsUblichen Malprogi ammen 
wcitervcrarbcllcn und in eigenen Prs^rBromen alsgrarischc Hinlcrgrün- 
dc cinscizen. 

Dun:h irickrciche l-'nrhrnsicrung erzeugt der F'raklal-Gcncraior auf dem 
CPC in Mode I zehn verschiedene FarbtOnc gleich/ciiig. 

Besl..Nr.2II.DM49,.* 
















































































Spielend 
den CPC 
beheiTschen 
lernen 

InitlivMiml 17 Prcigremmv, mit IHOsciOscmdrulvchrm Hiindbucli. 

Wiiiäniuslti. SicruicneinWon.cliiilhrCPCincInuhgctiathlhal, t)«nn 
räliler kecKncr. Wer bruuchl «niger VcfMichc? Sie weiden sliiuiien,, 

Das Spiel des Lehens Der CK! crzeugi »ach den Regeln des n«lUrlichcn 
Wachsiumsphiinuisiusche.kni-Inlline&ruklurcn. Ändern Sic die Vothus- 
<ei7iingcn und sehen Sic. wie neue, nie djgcwcscne Forineo emsicSoi. 

Mn tohee Hei hengenuli: Mil dem "B«'Ulc-Korce’’-Algorilhinus darf der 
CPC so nehlig loslcgcn und spiell in dem »frikanBchcn Slraicgiespiel 
"Kalaha” alle Gegner andre Wand —oder können Sic ihn ichlogen? 




BniwitiJungshilfe: Eine gut ausgcsWllclc Simulwion verscizl Sic in die 
Lage eines Bnlwicklungslicircrs, der eine Hungcrsnaab/.uwcnilcn vei- 
luchl. Aber Ihre Miiicl .sind begrerui... 

OerCPCab Suaiege: Ein rafl'inwrws Syslem von -Spiel^ugbcwetlungcm 
machi den CPC zu emetn fnsl unschtigbaren Gegner imGi^ng-Spiet, 
der ihnen anfangs saftige Niederlagen hescheren wird. Das Programm 
isl nuliirlich dennoch zu schlagen —aber wie? 

Oer CimpuJer lenir Erleben Sic ein Paradebeispiel für “KUnslIiche 
Imclligcnz"; Das Prograiiun “Mmi.schach" isl teraflliiig und wird inll 
jeder Pamc ein biOchen besser. 

Dux ÖMinsie-Experimeiil: Der Compiilcr zeig! Ilmcii in aniniicner 
Farb^fik einen jiniulierlen Lehensraum mit Wcnlctiind. Schalen iiiHl 
Wulfen, Erforschen .Sie die ökologischen CcsclrmSUigkcilen und schaf¬ 
fen Sic ein Mabilcs. nalUfliches Gleichgewicht, 

AuBcnlcm: Grafit: mil Ärmi/rfeirn Zuhleii, WwiHenen-liilixel. Geheim- 
Hi.v.te des Eoscalschen Dreiecks 

Best.-Nr. 213. DM 


Programmierte 

CPC-”Evergreens" 


Zwei Disketten iiiil echleii Kbssikeni lur <'!'<' 4fi4.fifi4 iiiid 
6I2H! Diese Pnigi.imme Mellen .iiisivu.mlK- .1er 

Icizicn Jiihrc da», jedes eiivclnc aiil seine An eiw.i» -,iii, 
Besoitdeies. 


<.'P<Mllghlighls I Spielc-Kl.issikei 

Casv-L'llghi (dies oehle ■'Delcn<lcr"-K'eling kaiiiiiil /unkk’l. 
MndMaze (Wnvviiispiel in drei DniKHsionen). Oumws Hnn 
lM.-hnelle>.Aclioii-Spicl nlil l.evel-Desigiicrl, Puiiit im loln- 
Esprexs (spannende ßninheiisiictvl, £ <y>/i'j illuhHln.inlvi 
Geschick Ikhkcii.sspiel), Ui iimiHimdie (' P.itiiian" l.iKi "i(llieii). 
S/x;icru.i;(Spit«ai-Junip'n,Run mil Streen Editiiil. Vi /ihni-ii 
(OcscliK-klithkeiivspiel mn GesvfUmuiigsdiljekl). .I.D-Wn/i/i 
(echter Kal Schlagen SicdcnCoiiipuierfl. V/vnvGViVA » i.l-D- 
Science-Fiction inilSpiizcn-Gijilikj. Kestell-Nr. 269, DM 4'J,. 


CPC-Higliüj-htsi Anwenduiijenund Clililics 

Kimiii-Ciipy (fiihigcsTiack-AnjIyse- unil Kiipieii'ingiamno. 
/ir«,v Piiiiiei (Kretiliv-Pakct lilrCruBkailen- iirxl Seilengcsl.d- 
limg), Oigil E.Mcnsiwi (Spr.Khe snftwaiviiciUig digitalisieivn 
mil dem Daleiirecürdcrf. Muskengriierahv (llircigcne Abli.i- 
geliildsthitmc», Jinwliik-Waiize (Slick-Eiiailaiinn fiir Cmvn 
tasten). Minidos (Disk-Ülilily), //p/t-nr./rt-WnuX (mn RSXcni. 
.^(leeii-Cimprrssm (SpeK'liei’pliilz.spiitoi ). Iians/ei iviin MS 
DOS rum CPC uikI zurück). Siiin-iiinai iDlskeilcnninnKoi'i. 
Oesignei (Zeichensaizgvneiaioi ). I<cs<eil-\r. ZTtt. DM 49.- 



Futter für PCW-Freunde: 



Joyce-Kild-Editor 

Zum Zeichnen hochauflö.scnder Grafiken 

DerJoyce ist mehr als cinTeaivei'arbcilungssyxtcm! Mil demJoyce- 

Bild-Edllwgesiallen Sie komfortabel hochauflösende Gralikm. bin¬ 
den die« in eigene Piogramme ein oder geben sic auf dem 
Joyce-Drucker aus. 

Der loyce-Bild-Ediior crschlieBl die Gnifikfaliigkcilen Ihres Joyce: 
FAaku-s. piaelgenaues Zeichnen durdi Normal- und Feinmodus. 

1 Aich- und Invcnicrungslünklii« in beiden Bearlwilungsmixii. ein¬ 
fache Inicgmiion beliebiger Ibaic in die Bitdelemcnle. Option zum 
Mcschen von fertigen BiWeni. Aasdruckmöglichkeil mit Randbe- 
aiinmung auf dem Joyoe-Dructer, komplelicr Quclheai in Turbo 
Pnscal 3.0 wird miigcliefcn 

Jiiyce-Prograinmsiiniinluiig 4: 

B(kl-I jll(.ir, «esl.-Nr, 219. DM 49.- 


Jüvcc-Hu.sineli-Pakct 

PiösemalionsgiTilik undTabellenteslverarbcilung 

CSX-Pliii — die ieisuiiKfiirBuxineß-Giofik aii/'dem Joy e 

Das Programm fertigt Balken- und Knrvcndiagr.atime an; cv erlaubt 
auch die HerMCilung von Strich- imd Tcxtgnifik, Die ßcnuizrrlllh 
iting ist iTicniigesicucrl Die fertigen Grafiken las«n sich auf Bild¬ 
schirm und Drucker uuxgeben, 

FelifTufe— plazieri live Texte millimeiriTieiniu 

H Knmplclic MenÜMeuerung wie von LocoScii|)t gewsihnt 

H Wahl von Sciteniringc. Zcllen.ibsland und l'abiilaloren 

H (ndividuclU; Btsiimmung von Schriftweiien und Schriftsnen 
■ TiixlUbcriijümicvon LocoSchptodenin ASCII-Pdrmat 
Joyce-l’rograniiRsHmmliing 3: 

Buainell Paket. KeM.-Nr. 317. U.VI SV.-* 


Joyce-Zeichensatz-l)esij»ner 
und M(fX 

A'ii'lKHSiUz-Dcsiynei-: ralilicrcn, Erzeugen laiü Alvspciclicin k«i 
Bildschirm-Zciclicnuiizen Drucken von voi lomialKrien ASCII 
Vexicii unier CP/M Plus möglich — vier fertig gesl.illele Zciclicmni 
zcimLicIcrumfuiigenihallen - ßonuspn^nunmzumEiiislollenilci 
Joyce-Srhiiiilslellv und 'i'iisliilui 

MGX. i-unklionen und MeÜwcno gi-.disch .sni HikMiniii iiml 
Diucker — nrithnwlische Gruiul- und SiiiKlerlimklioiicn miU dm 
Mcllbar — gteichzciligc Dursii-Ilunj niohrcrei l-unkiioncn iiikI Viel! 
reihen Druckeiausgahc dei Eigehnissc im GinlStonnal oäiglKli 
— ncten einer Khimmcrebene ist eure Memory Funklnin inicgrteil 

Jiiyer-l'riignimmsuniiiilung 1: 

Zeichciisiilz-Des^nfr und MffX, B«sl.-Ni'. 215. DVl 49.- ‘ 




G(’PM — die ^raiische 
Benul/eroberfliiche für den Joyce 

Schnell, bequem und komfortabel 

Der ganz« Komfurt iiiiHlci-ncr Ciimpulerei — clnvchliclilirh 
Mausbrdlenuiig, L'lir, THschenrechncr, Schniltslcllensleucruns, 
Pasxwiirtahfnigi' und vwlcm mehr. 

1 Sieucm Sie alle Funkiioncn Ihres Joyce wahlweise über 

Maus oder Tastatur 

1 AtlKiicn Sie mH der DarMcIlung aller Dateien in 'lhbrlh.-n- 
furin (ähnlich l.ocoScripil und den Slandardfiinktionen wie 
Kopieren, Lhiibeneiuicn und tzlschen 

H Auf bis zu drei Uiufwerkcn siclleii Sic Pammcier. Suchpfa¬ 
de (ohne SFTDBF) und das leinpiirare l.aufwci k beliebig 
ein. 

■ Verändern Sk Dalciallnbulc. und ivfen S« Programme rli- 
i-ckl von GCPM aus auf. 

1 Nmzen Sic die Funktionen zum VcrschlUsiehi und Kompri¬ 
mieren von ASClI-Dalcieii sowie die oplioiiate Passworiab- 
frage. 

B Sparen Sie Zell durch den integtiencn Taschenrechner mil 
Zwischcnspcichcr. 

H Verttiidcni Sic beliebig die Urundciiisienungen der Sehnin- 
slcBe. des Zcichciisiii/cs, dcrTastaiur, der Maus, der Diskel- 
icnlaufwerke und des Diuckcni 

1 Ein Screensaver stellt den Mimilor bei Nichlgcbrauch dun¬ 
kel. 

Mil deniOCP.M-Starlcrsclals Installiiuonsprogrammutid demdüsei- 
ligen, reich bcbiklctlen Handbuch im Handumdrehen bringen Sie 
den Komlört dcC'Oioßcn" im Handumdrehen auch aul Ihren Joycc- 
Joyce-PrograiiiniMiniiiiliing 7: 

(■ml'ische Bcniilzeroherflache, BeM.-Nr. 222. DM 69,-* 


Joyce-Tabellcnkalkulalioil 

Die universelle Tabellenkalkulalion für alle 
PCWs. Ob Monat.sbilanzen, Sleuciabrech- 
nung oder Kontoführung — mit diesem Pro¬ 
gramm sind Sie allen Aufgaben gewachsen. 

B Be.sunikrs schnelle ßerechnur^Milgnnlbmcn lUr die Feklcr- 
werte, übersichilichc Meitlirühning und Abfangen von Fehl' 
cingaben 

B Am Rund eingcblendetc Formel niil his zu 6X möglichen Zei¬ 
chen. eigene fcfehic zur Vbrkiirzung der Rarmcln und 
Eaponcniialautdrllcke 
,|o.vce-Pro)tranims«mmlung ft: 

Tabclleiilualkulaiiiin, Bevl.-Nr. 221. DM 59,--* 

Joyce-Sonderheft 4 

Restposten; nur solange Vorrat reicht! 

Aus drill Inhitlt: 

B WoidStar-Verbesjserungcn B Haidcopy-Riiulinc 

B Bundesligasimululjon fiir24-Nii(llcf 

B I’ulldiiwn-Menüs B dBase-l.ileralurver- 

B DiskcilenniMiilor wallung 

B llauptMÄdtcniteninLOK) * Universeilo. Wbi k- 

zeug zum Veriiiidem 
von dBase-Odicien 

Heft . DATABOX 12 Disketten). Be.sl.-Nr. .»052. DM 29.-» 


Joyce-Datenbank 

Die ideale Datenbank für den Joyce mil miiii- 
inalem Di.skctien-Speicherbedarr. Dennoch 
bietet Ihnen die Joyce-Dalenbank muximai 27 
Felder pro Datensatz, 50 Stellen pro Feld mul 
bis zu 35.000 Datensätze pro Datei, 

Daten effektiv verwalten mil der .loycc-Dalcn- 
hank; 

B HcMxidei s sclinell durch Wrwomlimg iki RAM-Disk .. . 

Programm 

B Univei-scll duiili die Verw-eiidung vi»i Sund.inl Diivkizii 
griffsdalL-ieii 

B Bct|iicm durch D,ilcnliijns.lcr von vorh.intlencii D.ncicii m 
neu angclugic 

B MiiNkc zum Errirv.cii und luk'rn viai Diilcii wnd.iiiiiiiii.msi.li 
gcncrien 

B Konitwiahe)durch Widil.Vr Sonicrkriicra-n odci Vlcm 
lialiMirin-tuiig 

B Listen mil auioninllschei .Spiihcnl'iiinialiciimg und Sp.ilk u 
MJmmen 

B Aultimaliss.licr l-jisiriig iil-uct Dnlcicn ms Diskcllcn-I h'.ii|>i 
inrnii 

B Spcichrriing ciiiimd gowjhlki Dmckii.namclci zin Wkdci 
vcrwcnduiig 

.loycu-PniKrummsuinmlung S; 

Diili-nbaiikfHrPl'VVH256un(l «512 Ifiir l’CVV 9St2j|iit.\nfi aiici, 

n<-sl.-Nr. 2211. DM (W,-*- 






































































Know-How 


10 REM ********************************* 

20 REM *** *** 

30 REM *** Mini-Adressverwaltung *** 

40 REM *** (c) 1992 Markus Kraeutner *** 

50 REM *** & CRC International *** 

60 REM *** *** 

70 REM ********************************* 

80 ' 

90 REM Felddefinitionen 
100 MaxAdr=50 

110 DIM Naine$(MaxAdr), AdresseS (MaxAdr), T 
elefonS(MaxAdr) 

120 ' 

130 REM Setze Bildschirimnodus und Farben 
140 MODE l:BORDER 0:INK 0,0:INK 1,24 
150 ' 

160 REM Hauptmenu 
170 PEN 1 

180 PRINT "Hauptmenu" 

190 PRINT 

200 PRINT "1. Adresse ergaenzen" 

210 PRINT "2. Blaettern" 

220 PRINT "3. Adresse loeschen" 

230 PRINT "4. Adressen speichern" 

240 PRINT "5. Adressen laden" 

250 PRINT "6. Programmende" 

260 PRINT 

270 INPUT "Ihre Wahl : ",wahl 
280 ON wähl GOSUB 310,500,680,780,970 
290 IF wahl=6 THEN PRINT "Auf Wiedersehen! 

":EKD 

300 GOTO 140 
310 ' 

320 REM Adresse ergaenzen 
330 ' 

340 REM Suche freies Feld 
350 2aehler=l 
360 REM Wiederhole 
370 2aehler=Zaehler+l 

380 IF Name${Zaehler-l)<>"" THEN GOTO 360 
390 Zaehler==Zaehler-l 
400 ' 

410 REM Neue Daten einiesen 
420 CLS 

430 PRINT "Nummer: ";Zaehler 
440 PRINT 
450 PEN 3 

460 LINE INPUT "Name: 

470 LINE INPUT "Adresse: 

r> 

480 LINE INPUT "Telefon: ";Tele£on$(Zaehle [3826] 

r) 

490 RETURN 
500 ' 

510 REM Blaettern 
520 Zeiger=l 
530 CLS 

540 PRINT "Nummer: 

550 PRINT 
560 PRINT "Name: 


";Name$(Zaehler) 

";Adresse$(Zaehle 


[1586] 

[417] 

[2496] 

[1429] 

[1979] 

[417] 

[1586] 

[117] 

[2816] 

[676] 

[3357] 

[117] 

[3657] 

[1690] 

[117] 

[ 1200 ] 

[549] 

[1169] 

[361] 

[1585] 

[1376] 

[879] 

[2025] 

[2858] 

[1907] 

[361] 

[1529] 

[1184] 

[2279] 

[409] 

[117] 

[1551] 

[117] 

[1492] 

[698] 

[1309] 

[2242] 

[2529] 

[2286] 

[117] 

[1381] 

[91] 

[2256] 

[361] 

[547] 

[2718] 

[2987] 


";Zeiger 
";Name$(Zeiger) 


[555] 

[117] 

[622] 

[487] 

[91] 

[2888] 

[361] 

[1999] 


570 PRINT "Adresse: ";Adreese$(Zeiger) [1854] 

580 PRINT "Telefon: ";Telefon$(Zeiger) [2859] 

590 PRINT [361] 

600 PRINT "V=Vorwaerts Z=Zurueck E=Ende" [3735] 
610 PRINT [361] 

620 INPüT "Ihre Wahl: ",wahlS [1359] 

630 wahiS=UPPER$(wahlS) [1689] 

640 IF wahlS="V" AND Zeiger<MaxAdr THEN Ze [3486] 
iger-Zeiger+l:GOTO 530 

650 IF wahlS="Z" AND Zeiger>l THEN Zeiger« [4254] 
Z6iger-l:GOTO 530 

660 IF wahl$<>"E" THEN GOTO 530 [1900] 

670 RETURN [555] 

680 ' [117] 

690 REM Adresse loeschen [1709] 

700 CLS [91] 

710 PEN 3 [547] 

720 INPUT "Welche Nummer loeschen (ENTER « [3357] 
zur.ueck) ? : ", nummer 

730 IF nummer=0 THEN RETURN [1098] 

740 NameS(nummer)«"" [734] 

750 adresseS(nummer)="" [1643] 

760 telefon$(nummer)="" [1382] 

770 RETURN [555] 

780 ' [117] 

790 REM Adressen speichern [1515] 

800 CLS [91] 

810 ' [117] 

820 REM Dateinamen erfragen [711] 

830 CAT [96] 

840 INPUT "Dateiname: ",name$ [2006] 

850 OPENOUT nameS [700] 

860 FOR Zaehler=l TO MaxAdr [1923] 

870 IF Name$(Zaehler)="" THEN GOTO 910 [1722] 

880 PRINT #9,NameS(Zaehler) [1941] 

890 PRINT #9,AdresseS(Zaehler) [1532] 

900 PRINT #9,TelefonS(Zaehler) [2104] 

910 REM leerfeld [700] 

920 NEXT [350] 

930 ' [117] 

940 REM Datei schliessen [719] 

950 CLOSEOUT [902] 

960 RETURN [555] 

970 ' [117] 

980 REM Adressen laden [1549] 

990 CLS [91] 

1000 ' [117] 

1010 REM Dateienamen erfragen [2653] 

1020 CAT [96] 

1030 INPUT "Dateiname: ",nameS [2006] 

1040 OPENIN nameS [1050] 

1050 Zaehler=l [698] 

1060 WHILE NOT EOF AND Zaehler<=MaxAdr [3831] 

1070 LINE INPUT #9,NameS(Zaehler) [2000] 

1080 LINE INPUT #9,AdresseS(Zaehler) [2240] 

1090 LINE INPUT #9,Telefon$(Zaehler) [1853] 

1100 Zaehler=Zaehler+l [2242] 

1110 WEND [390] 

1120 CLOSEIN [752] 

1130 RETURN [555] 



Auch 

alte Bäume 
wachsen nicht 
in den Himmel 

Gerade die alten Siume sind es näm¬ 
lich. dl« besondeis vom Maldstei- 
Mn Ded'Ch: Sind Nichdem sa* 
Jahihunderte Hi-we se ein Jahrtau¬ 
send überdauert haben lialten sie 
nurs den akiueilen Umvieltbelasiun- 
oen nicht mehr stand 
Das Kurandum .Alte llebenswene 
Bäume In Geulechland" e.;'. hat 
sich deshalb d« Renursg uno Erhal¬ 
tung dieser iinersetrlichen Natur¬ 
denkmäler zum Ziel geseltl Saum- 
patsnschalion und Spenden so'len 
gcnelie HlilsmaSnahman crmcgii- 
cnen. danvt diese Baumriesen auch 
lingtrislrgüberlehei' 

Spenosnkdhn), 
WiesbadencrVoiksbank 
Konlo-Nr 72Z9917 
BIZ S1O9D000 


Wenn Sie scn tür die Arbeit des 
Kuraro'lums inie'essieren. schicken 
Sieden Coupon an 

anatyseS concepi 
KDmmunikaticnsbtriiunDGmbH 
Lange StiaB« 13 
6000 Erankfutt' 


->e- 


Bitie schicken Sie mir 

n Ihre Infomappe 
11 into'maiion über Baumpeien- 
schatieh 




KuratO'lum 

Ahe kebenswerte Baume 
in Deutschtahd e V 




CPC-Word 


nur 149,90 DM 

Eine Itavenfbeftune der Spluenklaeael PulL-OowivMcnOt, P*M4*i«view, CrallkelnbindunL WYblWYC 
Pnsranm ureil Handbuch (ca. HO SeiletO hon^leB In Deutjdi - (nur fOr l26kBI 


SI-BOF BenuCiwoberftiidM 
BAUERN IN HESSEN WirOchMbiimulution 
SPRITTABRIKANTEN WlrudraltBlmutalJon 


99.90 DM 

49.90 DM 
49,90 DM 


Oobberlln HD 20 
MIcro-DesIgn ErweHerungs-Disk's 
3'Zwöllai(ferttFD-l 
MP-UOr CPC464 

MP-1 AulrOslsalz zum WlP-2 ICPC 61281 
3'-Dfekeflefl wioxell/AmSofll 
lOer-Pack 3* (Maxell/AmSofti 


899,-DM 
|e 29,95 DM 
149,95 DM 

69.99 DM 

29.99 DM 
5Z9 DM 

49.99 DM 


Dia« fbrtkm Sie unseren 
kostenlosen Splelekjria- 
log an. (Spiele schon ab 
9,95 DM) 

ZchschrHl / Fartzirw: 

C?C Power International 
Nr. 11 ftlr nur 5,- DM 
(incl. Coveidisk) 




Postfach 501132 - 5000 Köln SO - IW: 02236/47108 (äcnollanrukhmc «n 19.30 - 21J0 
Uhr) - Maitbox: 02236/83007 (2400b^ N 1) 

Vetsandkostcrt: Nachrvahme: 9,90 OM • Voiicasse: 6,90 DM 


6/7‘92 CPC 57 

































Know-how 



Amazonen 

und 

Städte 


Serie; Der Weg zum eigenen 
Rollenspiel 

Wer hat nicht schon einmal davon geträumt, seine eigene 
Stadt nach persönlichen Vorstellungen zu entwerfen und 
darin nach Herzenslust herumzutoben. Die erweiterte 
Version unseres Adventure-Creatorsmacht's möglich. 


Konnten bisher problemlos Landschaf¬ 
ten mit allem für ein Rollenspiel not¬ 
wendigen Inventar mit dem “Creator” 
erstellt werden, fehlte doch für ein rich¬ 
tiges Abenteuer-Feeling die nötige Tie¬ 
fe der Landschaften. Eine Stadt will 
schließlich im Detail besichtigt sein 
und nicht nur als bloße Position in einer 
Karte vermerkt werden. Durch den uni¬ 
versellen Charakter des Creator-Ent¬ 
wicklungstools lassen sich nun nicht 
nur Städte, sondern innerhalb dieser 
Städte auch Häuser, in den Häu.sern 
Keller und beliebige weitere Ver¬ 
schachtelungen vornehmen. 

Die schon vom letzten Rollenspiel-Teil 
bekannte Puzzlegrafik (Mosaik) wird 
in diesem Programm an die Adresse 
13470 geladen. Auch eine beliebige an¬ 
dere Adresse ist denkbar, sofern nicht 
die Landschafts- oder Programmdaten 
überschrieben werden. Die Land- 
schaftsdaiei, in der sich der Spieler be¬ 
wegt, enthält die jeweiligen Puzzle- 
nummem. Über die Puzzlenummer und 
Größe eines Jeden Grafikpuzzles ermit¬ 
telt das Programm dann die Adresse der 
Grafikdaten. In dem Beispielpro¬ 
gramm wurden insgesamt 31 Puzzles 
generiert. Als Schlüsselnummern wur¬ 
den in der Landschaftsdatei Werte von 


0 bis 30 verwendet. Über diese Werte 
lassen sich dann Gegenstände mit be¬ 
stimmten Aktionen verknüpfen. 

Im Demoprogramm kann der Spieler 
weder über Wasser noch über Felsen 
gehen. Die Abfrage lautet entspre¬ 
chend auf Wasser-oder Fels-Feld (Wert 
vier oder fünf). Die davon abhängige 
Aktion besteht darin, die Spielerfigur 
an einem Betreten der gesperrten 
Flächen zu hindern. Eine weitere Ereig¬ 
nisabfrage im Programm betrifft die 
Städtesymbole, die in der Landschaft 
auftauchen und die mit Hilfe der 
Grafiknummer 20 abfragbar sind. In 
dem speziellen Fall der Städte bildet die 
auszulösende Funktion den Schlüssel 
zur Tiefe des Rollenspiel-Szenarios. 
Durch Nachladen einer anderen Grafik 
wird der Spieler in weitere Details der 
Umgebung eingeführt. Er kann sich 
dort weiterbewegen und nach Belieben 
Ereignisse auslösen. 

Mit Taschenlampe 
und Schwert 

Im Bei.spielprogramm kann in jeder 
Stadt in das Haus rechts der Startpositi¬ 
on hineingegangen werden. Bis auf ei¬ 
nen leeren Keller, in dem nur ein paar 


nicht zum Spiel gehörende Saugratten 
herumlungern, passiert dort allerdings 
nichts. Anhand des leeren Kellers läßt 
sich das Programmier-Prinzip leicht er¬ 
kennen und kopieren. 

Nicht nur Städte lassen sich über dieses 
Modell der verschiedenen Ebenen ver¬ 
wirklichen. Auch komplexe Höhlen. 
Raumschiffe und Schiffe sind leicht 
durch mehrere Detailschichten zum 
Leben zu erwecken. Die Daten aller 
Ebenen werden in Datazeilen abgespei¬ 
chert. Die Skizze macht das Prinzip 
noch einmal deutlich. Im Programm 
bauen sich die Ebenen wie folgt auf: 
Data M,X,Y,Name.Xaus,Yaus,Spec 
(pro Ebene) “M” steht für Merkmal 
oder Objekte wie Stadt (20), Höhle, 
Haus, Keller und so weiter. “X” und 
“Y” bilden die Position des jeweiligen 
Symbols auf der Landschaft, wenn man 
die linke obere Ecke als Ursprung an¬ 
sieht. Mit Hilfe der Koordinaten-Un- 
terscheidung ist es möglich, mehrere 
Symbole gleicher Art in einer Ebene zu 
verwalten. “Name” entspricht dem Na- 


Leider konnten wir aus Plalzgründen die 
Dcmonstrationsfelder nicht mit abdrucken. 
Interessierte können sie jedoch der DATA- 
BOX zu diesem I Icft entnehmen. 
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men der zu ladenden Landschaft oder 
aber einer anderen Adresse iin Spei¬ 
cher, an die diese Landschaft schon ein¬ 
mal zu Anfang geladen wurde. Man 
kann Land.schaflen sowohl nachladen 
als auch einfach die Adres.sen verän¬ 
dern. um bekannte Teile neu zu verwen¬ 
den. Im Beispiel werden alle Land¬ 
schaften (Ebenen) bei Bedarf nachgela¬ 
den. Zur Unterscheidung, ob eine 
Landschaft nachgeladen werden soll 
oder nicht, genügt es, statt des Namens 
einfach die Anfangsadresse der im 
Speicher befindlichen Ebene anzuge¬ 
ben. 

“Xaus” und “Yaus” geben die Ausdeh¬ 
nung der Ebene in der jeweiligen Rich¬ 
tung an. 

Über“Spec'' lassen sich bei Bedarf Zu¬ 
gangsabfragen für Stadt- oder Höhlen¬ 
ebene oder eine Besitzabfrage realisie¬ 
ren. Die Variable “pmax” entspricht der 
Anzahl der vom Programm zu verwal¬ 
tenden Ebenen (inklusive der Start¬ 
ebene). “m” ist das Merkmal für die 
Ebene, “xalt” und “yalt" entsprechen 
der Position des Merkmals, “name” ist 
der Name oder die Adresse der Ebene, 
“xau.s” und “yaus” geben die Ausdeh¬ 


nung der Ebene in der jeweiligen Rich¬ 
tung an. “feld” benennt den Anfang der 
im Speicher befindlichen Ebene, “spei” 
entspricht der Adre.sse des Teils der 
Ebene, der momentan im Ausschnitt 
gezeigt wird, wobei die Adresse die lin¬ 
ke obere Ecke des Ausschnitts be¬ 
schreibt. 

Assembler 

“cur” ist die Bildschirmadresse der 
Spielerfigur, “x” und “y” entsprechen 
ihren Koordinaten im Ausschnitt, wo¬ 
bei die linke obere Ecke als Ursprung 
gesetzt ist. “xscr” und “yscr” sind Zähl¬ 
variablen, die angeben, wie oft die 
Landschaft in die jeweilige Richtung 
gescrollt wurde, “last” ist die Adresse, 
ab der die für eine tiefere Ebene nötigen 
Daten abgespeichert werden, um eine 
Rückkehr zur höher]legenden Ebene zu 
ennöglichen. Pro Sprung in eine tiefere 
Ebene werden fünf Bytes gerettet, die 
die korrekte Rückkehr sichern. Man 
sollte aufpassen, daß durch diese Varia¬ 
ble kein wichtiger Speicherbereich 
überschrieben wird (etwa eine Land¬ 
schaft). Bei einer Rückkehr wird die 


Variable wieder um fünf reduziert. Die¬ 
ser Hinweis gilt insbesondere für stark 
verschachtelte Ebenen. 

Der Maschinenprogramm-Aufruf “Call 
&A000,adr” setzt den Anfang der 
Puzzledaten auf “adr”. “A170,adr, 
xaus” zeigt den Ebencnausschnitt mit 
der Anfangsadresse “adr” und der Aus¬ 
dehnung “x” der Ebene “xaus”. 
“AICF.cur” stellt die Spielerfigur an 
der Adresse “cur” dar. “AüOA, 
adr,xau.s,cur” scrollt die Ebene eine Po¬ 
sition nach rechts, “adr” entspricht der 
Adresse des neuen Ebenenausschnit- 
les. “xau.s” ist die X-Ausdehnung der 
Ebene, und “cur” stellt die Bild¬ 
schirmadresse der Spielerfigur dar. 
"A048,adr,xaus,cur” scrollt nach links, 
“A()86,adr,cur” scrollt nach unten, und 
“A0C4,adr,cur” scrollt nach oben. 

“Al50” überschreibt die Spielerfigur 
mit dem Hintergrund. 

Nach so vielen Details sollte der spiele¬ 
rische Umgang mit dem Creator über 
alle theoretischen Hürden hinweghel¬ 
fen. 

Alles, was ein Rollenspiel braucht, ... 
derCreatorhal’s. 

Ulrich Schm ilz & Matthias Fink/rs 


100 'CREATOR.BAS 

110 'CPC 464(plus)/664/6128(plus) 

120 '(c) 1992 Ulrich Schmitz, 

130 ' Matthias Fink 

140 ' & CPC International 

150 MEMORY 12000:LOAD"creator.bin",&A000 
160 DATA 4,2,0,7,23,12,18,9,24,15,6,3,8,13 
, 10,26 

170 DATA &x00000000,&x01000000,&x00000100, 
&X01000100,&X00010000,&X01010000,&X0001010 

0,&x01010100,sx00000001,&x01000001,six00000 

ioi,Gixoioooioi,&xoooioooi,&xoioioooi,&xooo 

10101,&X01010101 

180 BORDER 0:FOR n=0 TO 15:READ a:INK n,a: 
NEXT n 

190 DIM wert(l5}; RESTORE 170:'matrixen ei 
niesen 

200 FOR n=0 TO 15:READ wert(n):NEXT 

210 CLS:PRINT "Geben sie bitte die x,y Aus 

dehnung an." 

220 PRINT "Min. 11*11 Max 255*255 (RETURN= 
137*116)":INPÜT"X= ",x:IF X=0 THEN 300 
230 INPÜT "y= ",y;IF X<11 OR y<ll OR x>255 
OR y>255 THEN PRINT CHR$(7):GOTO 210 
240 PRINT"Die Landschaft belegt ein Platz 
von";PRlNT x*y;" Bytes.Ist das Okay (j/n)? 

250 a$*UPPERS(INKEYS):IF aS="" THEN 250 
260 IF a$»"N" THEN 210 

270 POKE firA168,x:POKE &AlE0,x:POKE &Ä 240 ,X 
-10:POKE &A25B,x:POKE &A36D,x:POKE &A3E8,X 
tPOKE &A32A,y-10:xk=(x XOR &FFFP)+1:x=x*10 
:IF xk<0 THEN xk=xk+2^16 
280 hi=INT(x/256):lo=x-hi*256:POKE &A 359,1 
o:POKE &A35A,hi 

290 hi*INT(xk/256):lo=xk-hi*256:POKE &A 2 F 0 
,lo:POKE SA2Fl,hi 

300 po=l :adr«57918;x=l:y=:i :puffe2=40960-81 
:puffer=puffe2:shapoi=0:shanfang=l3470;fei 
d-19300:shaend=INT{(feld-shanfang)/80):POK 
E &A08F,SC9:POKE SA0SE,0:POKE &Ap61,0 


(860] 

[1940] 

[1700] 

[1937] 

[2118] 

[ 2002 ] 

[1005] 

[10414] 


[2471] 

[2847] 

[1757] 

[5003] 

[4324] 

[5337] 

[7643] 


[1834] 

[1016] 

[7722] 


[1689] 

[3801] 

[9141] 


310 GOSUB 1240:GOSüa 1280 

3^ shapadr(1) =&C308: shapadr(2) =&C30D: shap 

adr(3)=&C3A8:shapadr(4)=&C3AD:links=i;fpen 

330 GOTO 1320 

340 aS=ÜPPER$(INKEYS):IF a$="" THEN a$="e" 
350 a=ASC{aS) 

360 IF a=32 THEN 880 
370 IF a=ScF0 THEN 580 
380 IF a=&Fl THEN 660 
390 IF a=:&F2 THEN 740 
400 IF a*&F3 THEN 810 

410 IF ass&F4 THEN fpen»fpen-l:IF fpen<0 TH 
EN fpen=0 

420 IF a=&F5 THEN fpen=fpen+l:IF fpen>l5 T 

HEN fpen=l5 

430 IF a=67 THEN 1000 

440 IF a=80 THEN 1430 

450 IF a=SF6 THEN po=po-l:IF po<l THEN po= 

460 IP a=&F7 THEN po=po-H:IF po>4 THEN po= 

470 IF a=73 THEN 990 

480 IF a=75 THEN 1380 

490 IF a«83 THEN 1470 

500 IF a=76 THEN 1640 

510 IF a=87 THEN 1800 

520 LOCATE 1,5:PRlNT"Pen ";fpen 

530 LOCATE 1,6:PRINT"Schirm" ;po 

540 LOCATE 11,5:PRINT"Shape ";shapoi; 

550 LOCATE 11,6:PRiNT"Max. ";shaend; 

560 CALL &A500,shapadr(po),puffe2 

570 GOTO 340 

580 IF y=l THEN 340:'Cursor up 
590 y=y-l 

600 CALL &A476:'hintergrund wiederherstell 
en 

610 adr=adr-10240 

620 IF adr<49l52 THEN adr»adr+16304 
630 CALL &Ä482,255,adr 
640 puffer=puffer-5 


[1316] 

[5896] 


[450] 

[2327] 

[1036] 

[1004] 

[710] 

[318] 

[455] 

[714] 

[2250] 

[3112] 

[1183] 

[1132] 

[3505] 

[1308] 

[984] 

[1267] 

[696] 

[1062] 

[1389] 

[1683] 

[1732] 

[1414] 

[1281] 

[2052] 

[464] 

[1646] 

[773] 

[1719] 

[644] 

[1341] 

[1333] 

[935] 
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650 GOTO 340 

660 IF y=16 THEN 340: 'Cursor down 
670 y=y+i 

680 CALL &A476:'Hintergrund wiederherstell 
en 

690 adr=adr+10240 

700 IF adr>65535 THEN adr=adr-65536:adr»ad 
r+49232 

710 CALL &A482,255,adr 
720 puffer=puffer+5 
730 GOTO 340 

740 IF x=l THEN 340:'Cursor left 
750 x=x-l 

760 CALL &A476:'Hintergrund wiederherstell 
en 

770 adr=adr-3 

780 CALL &A482,255,adr 

790 IF x/2=INT(x/2) THEN puffer=puffer-1:1 
inks=0:ELSE links=l 
800 GOTO 340 

810 IF x=10 THEN 340:'Cursor right 
820 x^x +1 

830 CALL &A476:'Hintergrund wiederherstell 
en 

840 adr=adr+3 

850 CALL &A482,255,adr 

860 IF x/2<>IlJT(x/2) THEN puffer»puffer+1: 
links=l:ELSE links=0 
870 GOTO 340 

880 IF links=0 THEN 900:'punkt setzen 
896 verkn=&55:verkn2=2:GOTO 910 
900 verkn*&AA:verkn2=l 
910-byte=PEEK(puffer) AND verkn 
920 byte=byte OR (verkn2*wert(fpen)) 

930 PORE puffer,byte 

940 CALL &A500,shapadr(po),pu£fe2 

950 byte=wert(fpen)OR (2*wert(fpen)) 

960 PORE &A5E8,byte 
970 GOTO 340 

980 PORE &A039,&C9:CALL &A022,16:PORE &A03 
9,&3E:RETURN 

990 LOCATE 3,20:PRlNT"Geben Sie bitte":LOC 
ATE 3,21:PRINT’'Nr,Inkl,Ink2 an":LOCATE 3,2 
2:INPUT "■’,n,il,i2:INK n,il,i2:GOTO 1360 
1000 LOCATE 4,20:PRINT''Clear (P)uf£er" 


[464] 

[2265] 

[809] 

[1719] 


[684 

[1368 


[716] 

[464] 

[1505] 

[849] 

[1719] 

[378] 

[1333] 

[4157] 

[464] 

[1582] 

[853] 

[1719] 

[390] 

[1333] 

[2958] 


[464] 

[1648] 

[ 1101 ] 

[1245] 

[945] 

[2418] 

[1475] 

[2052] 

[1490] 

[ 997 ] 

[464] 

[ 2221 ] 


[8594] 


[2153] 


lOlö LOCATE 5,21:PRINT "oder (S)hape'' 

1020 LOCATE 5,22:PRINT "oder (F)eld" 

1030 aS=INKEY$:IF aS="" THEN 1030 

1040 IF UPPER$(a$)="P" THEN BYTE=WERT(FPEN 

) OR (2*WERT(FPEN)):FOR N=puffe2 TO puffe2 

+79:POKE N,BYTE:NEXT:GOTO 1350 

1050 IF UPPER$(aS) = "F'' THEN GOSÜB 1280:GOT 

0 1360 

1060 IF UPPER$(a$)<>"S" THEN 1030 
1070 IF shapoi=0 THEN 1360 
1080 LOCATE 1,20:PRINT"Wollen Sie 
alle Shapes loeschen (j/n)" 

1090 a$=INREYS:IF a$="" THEN 1090 
1100 IF UPPER$(a$)<>"J*' THEN 1120 
1110 GOSÜB 1240:GOSUB 980:GOTO 1360 
1120 LOCATE l,20:PRINT"Editieren Sie Bitte 

I« • 

1130 LOCATE l,21:PRINT"das ZU loeschende" 
1140 LOCATE 1,22:PRINT"SHAPE mit Joystick" 
1150 CALL &A022,shapoi:n=PEEK(&A5F0):'puzz 
lenuinmer 

1160 IF (shapoi-n)=l THEN 1200 

1170 laehi=INT(((shapoi-n-l)*80)/256):lael 

o=({shapoi-n-l)*80)-(256*laehi) 

1180 PORE &A537,laelo:PORE &A538,laehi 
1190 CALL &A52A,shanfang+n*80,shanfang+(n+ 
1)*80 

1200 PORE &A537,&4F:PORE &A538,SO:PORE sha 
nfang+(shapoi-1)*80,0 

1210 CALL &A52A,shanfang+(shapoi-l)*ao+l,s 

hanfang+(shapoi- 1)*80 

1220 PORE &A537,&50:shapoi=shapoi-l 

1230 GOSÜB 980:GOTO 1360 

1240 PORE shanfang,0:'alle shapes loeschen 
1250 laehi=INT((feld-shanfang-i)/256):lael 
o=feld-shanfang-l-(laehi*256) 

1260 PORE SA537,laelo:POKE SA538,laehi:CAL 

L &A52A,shan£ang-(-i,shan£ang 

1270 PORE &A537,&50:POKE &A538,0:shapoi=0: 

RETURN 

1280 PORE £eld,0:'feld loeschen 


[2527] 

[3088] 

[1466] 

[4649] 


[1268] 

[1285] 

[1286] 

[5598] 

[1455] 
[1745] 
[1477 ] 
[2987] 

[2342] 

[3829] 

[3000] 

[983] 

[5150] 

[1274] 

[2687] 

[2654] 

[3478] 

[2249] 

[1267] 

[2392] 

[4235] 

[3025] 

[3140] 

(2070) 


1290 laehi*=lNT( (puffe2-feld-l)/256) :laeloa 
puffe2-feld-l-<laehi*256) 

1300 PORE &A537,laelo:PORE &A53B,laehi:CAL 
L SA52A,feld+l,feld 

1310 PORE &A537,SSO:PORE SA538,0:RETURN 
1320 MODE 0:GOSUB 980:PLOT 108,119,15:DRAW 
108,280:DRAW 354,280:DRAW 354,119:DRAW 10 
8,119 

1330 PLOT 444,190:DRAW 528,190:DRAW 528,25 
6:DRAW 444,256:DRAW 444,190 
1340 LOCATE 3,2:FOR n=0 TO 15:PEN n:PRINT" 
( )";:NEXT:PRINT:PRINT " 0123456789012345 

II 

1350 CALL &A4B4,puffe2:CALL SA482,255,adr 
1360 LOCATE 1,20:PRINT" 

n 

1370 GOTO 340 

1380 LOCATE 1,20:PRlNT"Markieren Sie den": 
LOCATE l,2l:PRINT"Plat2 fuer das Shape";:L 
OCATE l,22:PRINT"Wird ueberschrieben" 

1390 IF shapoi=shaend THEN CALL 6A022,shap 
oi:ELSE CALL SA022,(shapoi+1) 

1400 n=PEEK(SA5F0):CALL SA52A,shanfang+n*8 
0,puffe2 

1410 IF n=shapoi AND shapoi<shaend THEN sh 

apoi=shapoi+l 

1420 GOSÜB 9«0:GOTO 1360 

1430 IF Shapoi=0 THEN 340 

1440 LOCATE 1,20:PRINT"Markieren Sie das": 
LOCATE l,21:PRINT"Shape fuer den":LOCATE 1 
,22:PRINT"Puffer" 

1450 CALL SA022,shapoi:n=PEER(SA5F0) 

1460 CALL SA52A,puffe2,shanfang+n*BO:GOSUB 
980:GOTO 1350 

1470 MODE 1:'speichern von daten 

1480 LOCATE 3,7:PRINT"Wollen Sie die (S)ha 

pes" 

1490 LOCATE 3,9;PRINT"oder die (L)andschaf 
t abspeichern." 

1500 aS=UPPER$(INREYS);IF aS«"" THEN 1500 
1510 IF a$<>''S'' AND aS<>"L" THEN 1500 
1520 LOCATE 3,7:PRINT "Bitte geben Sie ein 
en Namen" 

1530 LOCATE 3,9:PRINT"fuer die Daten an (m 
ax.8 Buchst.)!" 

1540 LOCATE 3,12:INPUT ":",name$ 

1550 IF LEN(nameS)<l OR LBN(name$)>8 THEN 
1470 

1560 IF a$="L" THEN 1610 
1570 name$=nameS+".spr" 

1580 PORE shanfang-1,shapoi 

1590 SAVE name$,b,shanfang-1,shapoi*80+l 

1600 GOTO 1320 

1610 name$=name$+".fld" 

1620 SAVE name$,b,feld,PEER(SA168)*(PEER(S 
A32A)+10) 

1630 GOTO 1320 

1640 MODE l:'einladen von daten 

1650 LOCATE 3,7:PRINT "Wollen Sie die (S)h 

apes" 

1660 LOCATE 3,9:PRINT"oder die (L)andschaf 
t einladen." 

1670 aS=UPPER$(INKEY$):IF 3$="" THEN 1670 
1680 IF a$<>"S" AND a$<>"L" THEN 1670 
1690 LOCATE 3,7:PRfNT "Bitte geben Sie ein 
en Namen" 

1700 LOCATE 3,9:PRlNT"fu6r die Daten an (m 
ax.8 Buchst.)!" 

1710 LOCATE 3,12;INPUT ":",naneS 

1720 IF LEN(name$)<l OR LEN(nameS)>8 THEN 

1640 

1730 IF a$="L" THEN 1770 
1740 narae$=nameS+".spr" 

1750 LOAD nameS,shanfang-l:shapoi=PEEK{sha 
nfang-l) 

1760 GOTO 1320 

1770 nameS=nameS+".fld" 

1780 LOAD name$,feld 
1790 GOTO 1320 

1800 IF shapoi=0 THEN 340:ELSE MODE 0 
1810 LOCATE l,l:PRINT"Pla2ieren sie Shapes 
";;LOCATE l,22:PRINT"Mit oben oder unten" 
1820 LOCATE 2,25:PRlNT"wieder zurueck."; 
1830 PORE 6A08F,SC3:POKE SAOSE,SC8:PORE SA 
061,SC8:CALL SA000,shapoi 

1840 PORE SA08F,SC9:PORE SA05E,SO:PORE SAO 
61,S0:CALL SBB03:GOTO 1320 


[2918] 

[2049] 

[2538] 

[5532] 


[2469] 

[5108] 


[3106] 

[3515] 

[464] 

[10967] 


[4729] 

[3508] 

[4161] 

[1267] 

[1230] 

[7028] 


[1581] 
[2347] 

[2364] 

[3940] 

[5699] 

[1916] 

[24B5] 

(2708] 

[3919] 

[2185] 

[1997] 

[1038] 

[527] 

[1231] 

[2677] 

[450] 

[225] 

[3631] 

[450] 

[1558] 

[3940] 

[5430] 

[1826] 

[2714] 

[2708] 

[3919] 

[2185] 

[2162] 

[950] 

[527] 

[2733] 


[651] 

[450] 

[2345] 

[5987] 

[2998] 

[3734] 

[2433] 
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100 ' CREATOR2.BAS 

110 ' CPC 464(plus)/664/6128(plus) 

120 ' (c) 1992 Ulrich Schmitz, 

130 ' Matthias Pink 

140 ' & CPC International 

150 DATA 4,2,0,7,23,12,18,9,24,15,6,3,8,13 
,10,26 

160 FOR a =0 TO 15:READ nrINK a,n:NEXT:BORD 
ER 0:MODE 0 

170 RESTORE 720:pmax=5:DIM ni(pmax) ,xalt(pin 
ax),yalt(pmax),nameS(pmax),xaus(pmax),yaus 
(pmax),spec(pmax) 

180 FOR n=l TO pmax:READ m(n),xalt(n),yalt 
(n) ,naineS(n) ,xaus(n) ,yaus(n) ,spec(n) ;NEXT 
190 ebene«! 

200 MEMORY 13399:LOAD"creator2.bin",&AOOO: 
CALL &A000,13470 

210 LOAD"deino 2 . spr", 13469: LOAD’'demo 2 . f Id", 
19300 

220 feld=19300:spei«l9300::cur=49907:x=4:y 

=4 jxscr=l;yscr=l:last=l3400 

230 CALL &A170,spei,xaus(ebene):CALL &A 1 CF 

,cur 

240 jaJOy(O) 

250 IP 1=1 THEN GOSUB 410 
260 IF j=2 THEN GOSUB 460 
270 IF 1=4 THEN GOSUB 310 
280 IF 3=8 THEN GOSUB 360 
290 IF j<>16 THEN 240 
300 STOP 

310 IF X=1 AND xscr=l THEN RETURN:'links 
320 a=PEEK(spei+x+y*xaus(ebene)-l):GOSUB 5 
10 

330 IF a=256 THEN RETURN 

340 IF x=l THEN xscr=xscr-l:spei=spei-l;CA 
LL &AOOA,spei,xaus(ebene),cur:RETURN 
350 x=x-l:CALL &A150:cur=cur-5:CALL &A 1 CF, 
cur:RETURN 

360 IF x =8 AND xscr=xaus(ebene)-9 THEN RET 
URN:'rechts 

370 a=PEEK(spei+x+y*xaus(ebene)+l}:GOSUB 5 
10 

380 IF a=256 THEN RETURN 
390 IF x =8 THEN xscr=xscr+l:spei=spei+l:CA 
LL SrA048,spei+9,xaus{ebene) ,cur:RETURN 
400 X=X+ 1 ;CALL &A150:cur=cur+5:CALL &A 1 CF, 
cur;RETURN 

410 IF y=l AND yscr=l THEN RETURN:'oben 
420 a=PEEK(spei+x+(y-l)*xaus(ebene)):GOSUB 
510 

430 IF a=256 THEN RETURN 

440 IF y=l THEN yscr=yscr-l:spei=spei-xaus 
(ebene):CALL &A0S6,spei,cur:RETURN 
450 y=y-l:CALL &A150:cur=Cur-160:CALL &A 1 C 
F,cur:RETURN 

460 IP y =8 AND yscr=yaus{ebene)-9 THEN RET 
URN:'unten 

470^a=PEEK(spei+x+(y+l)*xaus(ebene)):GOSUB 

480 IF a=256 THEN RETURN 

490 IP y =8 THEN yscr=yscr+l:spei=spei+xaus 

(ebene):CALL fi:A0C4,spei+9*xaus(ebene),cur: 

RETURN 

500 y=y+l:CALL &A150:cur=cur+160:CALL &A 1 C 

F,cur:RETURN 

510 'ereignisabfrage 

520 IF a=4 OR a=5 THEN a=256:RETÜRN 

530 IF a<>25 THEN 600 

540 last=last-5 

550 n=PEEK(last):x=PEEK{last+l):y=PEEK(las 
t+ 2 ):xscr=PEEK(last+3);yscr=PEEK(last+4) 

560 name=VAL(name$(n)):lP nameoO THEN fei 
d=name:GOTO 580 

570 LOAD nameS(n) + ''.fld'',l9300:feld=19300 
580 cur=49247+5*x+160*y:spei=feld+xscr-l+( 
yscr- 1 )*xaus(n) 

590 ebene=n:CALL &Al70,spei,xaus(ebene):CA 

LL StAlCF,cur:a=256:RETURN 

600 FOR n=l TO pmax 

610 IF a<>m(n) THEN 700 

620 IF ABS(xalt(n)-(x+xscr ))>1 THEN 700 

630 IF ABS(yalt(n)-(y+yscrH>l THEN 700 

640 POKE last,ebene:POKE last+l,x:POKE las 

t+2,y:POKE last+3,xscr:POKE last+4,yscr 

650 6bene=n:last=iast+5 

660 name=VAL(name$(n)) :IF nameoO THEN fei 
d=name:GOTO 680 

670 LOAD nameS(n)+".fld",19300:feld=19300 
680 x=l:y=i:xscr=l:yscr=l:cur=49247+5*x+l6 
0 *y:spei=feld+xscr-l+(yscr- 1 )*xaus(n) 


[358] 

[1940] 

[1700] 

[1937] 

[2118] 

[1005] 

[2228] 

[5749] 

[7564] 

[349] 

[3119] 

[4434] 

[5310] 

[2805] 

[892] 

[1035] 

[2006] 

[1191] 

[844] 

[874] 

[464] 

[1634] 

[3062] 

[1275] 

[5979] 

[3290] 

[2253] 

[2397] 

[1275] 

[4240] 

[4616] 

[ 1222 ] 

[2782] 

[1275] 

[5998] 

[3868] 

[4304] 

[3569] 

[1275] 

[7014] 


[2701] 

[562] 

[1822] 

[1185] 

[994] 

[5240] 

[4242] 

[1838] 

[2860] 

[3509] 

[1092] 

[642] 

[1214] 

[1978] 

[5264] 

[940] 

[4222] 

[1838] 

[4878] 


690 n=pmax:a=256:CALL &A170,spei,xaus(eben [33671 
e):CALL &AlCF,cur v i j 

700 NEXT [3501 

710 RETURN 5551 

720 DATA 255,0,0,deraO2,50,50,0 [804] 

730 DATA 20,34,22,Stadtl,25,25,0 [14911 

740 DATA 20,22,29,stadtl,25,25,0 [1336 

750 DATA 20,45,28,stadtl,25,25,0 [2444] 

760 DATA 22,3,2,hausl,15,15,0 [1003] 
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' CREATOR2.LAD 
' erstellt CREATOR 2 .BIN 
' CPC 464(plus)/664/6128(plus) 

' (c) 1992 Ulrich Schmitz, 

' Matthias Fink 

' 5t CPC International 

MEMORY &9FPF 

FOR adr=&A 000 TO &A 2 g 8 STEP 11 
FOR i=adr TO adr+ 10 

READ b$ 

byte=VAL("&"+bS) 

POKE i,byte 
NEXT i 
NEXT adr 

SAVE"creator2.bin",b,&A000,&298 

END 

DATA DD,6E,00,DD,66,01,22,97,A2,C9,21 
DATA 20,08,2 2,OB,Al,21,50,CO,22,16,Al 
DATA 21,2D,00,22,06,Al,21,ED,88,22,08 
DATA Al,CD,50,Al,11,90,CO,21,8B,CO,OE 
DATA 14,CD,02,A1,21,A0,00,22,42,A1,DD 
DATA 6E,02,22,4e,Al,DD,5E,04,DD,56,05 
DATA 2X,5F,C0,C3,23,Al,21,03,07,22,OB 
DATA Al,21,50,CO,22,16,Al,21,20,00,22 
DATA 06,Al,21,ED,BO,22,08,Al,CD,50,Al 
DATA 11,5F,CO,21,64,CO,OE,14,CD,02, Al 
DATA 21,AO,00,22,42,A1,DD,6E,02,22,48 
DATA A1,DD,5E,04,DD,56,05,21,8C,C0,C3 
DATA 23,Al,21,CE,F7,22,OB,Al,21,BO,3F 
DATA 22,16,Al,21,32,00,22,06,Al,21,ED 
DATA BO,22,08,Al,CD,50,Al,11,4F,FE,21 
DATA AF,FD,OE,12,CD,02,Al,21,05,00,22 
DATA 42,A1,21,01,00,22,48,A1,DD,5E,02 
DATA DD,56,03,21,5F,C0,C3,23,A1,21,CE 
DATA 07,22,OB,Al,21,50,CO,22,16,Al,21 
DATA 32,00,22,06,Al,21,ED,BO,22,08,Al 
DATA CD,50,Al,11,5F,CO,21,FF,CO,OE,12 
DATA CD,02,Al,21,05,00,22,42,Al,21,01 
DATA 00,22,48,Al,DD,5E,02,DD,56,03,21 
DATA FF,C5,C3,23,Ä1,06,08,C5,01,32,00 
DATA ED,BO,01,CE,07,EB,09,EB,09,CI,10 
DATA FO,C5,Ol,5O,CO,EB,O9,EB,09,Cl,0D 
DATA 20,E2,C3,CF,A1,06,0A,C5,D5,B5,1A 
DATA 6F,26, 00 ,5F,54,29,29,19,29,29,29 
DATA 29,ED,5B,97,A2,19,EB,E1,E5,CD,56 
DATA Al,El,11,AO,00,19,Dl,EB,01,89,00 
DATA 09,EB,C1,10,D6,C9,2A,95,A2,11,45 
DATA A2,OE,10,06,05,lA,77,13,23,10,FA 
DATA D5,11,FD,07,19,30,04,11,50,CO,19 
DATA Dl,OD,2O,E9,C9,06,OA,21,AO,O0,22 
DATA 42,A1,DD,6E,00,22,48,A1,DD,5E,02 
DATA DD,56,03,21,5F,CO,D5,E5,C5,CD,23 
DATA Al,CI,El,11,05,00,19,Dl,13,10,FO 
DATA C9,11,F5,A1,OE,10,06,05,C5,1A,E6 
DATA AA,20,03,7E,E6,AA,4F,1A,E6,55,20 
DATA 03,7B,E6,55,B1,77,13,23,C1,10,E7 
DATA 7D,C6,FB,6F,3E,07,8C,67,30,08,70 
DATA C6,50,6F,3E,CO,8C,67,OD,C2,9D,A1 
DATA C9,3E,7E,32,5A,A1,3E,12,32,5B,A1 
DATA DD,6E,00,DD,66,01,22,95,A2,CD,50 
DATA A1,3E,1A,32,5A,A1,3E,77,32,5B,A1 
DATA 2A,95,A2,C3,98,A1,00,51,B7,2A,00 
DATA 00,F3,CF,3F,00,00,45,06,8A,00,00 
DATA 45,03,8A,00,00,00,OC,00,00,00,04 
DATA CC,08,00,00,04,CC,08,00,00,04,CC 
DATA 08,00,00,04,CC,08,00,00,AA,CC,08 
DATA 00,55,AA,OC,00,00,FF,00,OC,00,00 
DATA AA,04,00,08,00,00,04,00,08,00,00 
DATA OG, 00 , 0 c,00,00,00,00,00,00,00,00 
DATA 00,00,00,00,00,00,00,00,00,00,00 
DATA 00,00,00,00,00,00,00,00,00,00,00 
DATA 00,00,00,00,00,00,00,00,00,00,00 
DATA 00,00,00,00,00,00,00,00,00,00,00 
DATA 00,00,00,00,00,00,00,00,00,00,00 
DATA 00,00,00,00,00,00,00,00,00,00,00 
DATA 00,00,00,00,00,00,00,00,00,00,00 
DATA 00,00,00,00,00,00,00,00,00,00,00 
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Know-how 


Ein ROM fürs RAM 

Eproms am CPC 

Der CPC verf ugt an der Rückseite über einen Erweiterungs-Port, der sich für 
so manch interessante Hardware-Erweiterung nutzen läßt. Unter anderem 
auch für Eproms, deren Programmierung hier beschrieben wird. 



Ein Eprom ist ein Komproiniß /.wi¬ 
schen RAM und ROM. Es kann einmal 
beschrieben und dann nur noch gelesen 
werden. Mittels einer starken UV-Bc- 
strahlung ist es jedoch möglich, den 
kompletten Eprom zu löschen, um ihn 
dann wieder zu beschreiben. Da dies 
dem Eprom aber nicht gerade gut tut, 
sollte dieser Vorgang so selten wie 
möglich durcligefUhrl werden. 

Um ein fertig gebranntes (mit Software 
beschriebenes) Eprom nutzen zu kön¬ 
nen, benötigt man neben dem CPC 
noch eine Eprom-Box, die an den Er¬ 
weiterungs-Port des CPC angeschlos¬ 
sen wird. Je nach Art der Box und des 
CPC-Modells passen dann zwischen 
sieben und 15 Eproms hinein. 
Selbstverständlich gibt es ziemlich viel 
Software auf Eprom. Folgende Liste 
hat nicht denn Anspruch vollständig zu 
sein, sie soll lediglich aufzeigen, wel¬ 
che Software auf Eprom läuft. 

XDDOS, RDOS, PROTEXT. PRO- 
MERGE, PROSPELL. DISCOLOGY. 
MAXAM, UTOPIA. ALPHA-ROM. 
MB-DOS, COPYLOCK. VDOS, 
LOCKSMITH. CONTEXT. ODDJOB. 
Der Vorteil der Eproms ist, daß Sie so¬ 
fort nach dem Einschalten des CPCs in¬ 
itialisiert werden. Nun können sie ganz 
gewöhnlich per RSX angesprochen 
werden. Sie stehen also ständig zur Ver¬ 
fügung und müssen nicht erst auf einer 
der zahlreichen Disketten herausge¬ 
sucht und geladen werden. Gleichzeitig 
besteht auch noch die Möglichkeit, 


beim Einschalten diverse Betriebssy¬ 
stemroutinen zu patchen, die Farbe 
oder den Bildschirmmodus zu ändern 
oder aber direkt Programme zu starten. 
Aber dies sind nicht die einzigen Vor¬ 
teile der Eproms. So hat man bei Pro¬ 
text gegenüber der Diskettenversion 
mit 20 kByte ganze 40 kByte freien 
Textspeicher zur Verfügung. Manche 
Programme sind auch nur auf Eprom 
nützlich, so zum Beispiel die Disket¬ 
tenaufsätze VDOS, XDDOS, AMS- 
DOSoderRODOS. 

Fertig gebrannte Eproms kosten im 
Durchschnitt zwischen 70 und 100 
DM. was im Vergleich zu den Soft¬ 
ware-Versionen auch nicht viel teurer 
ist. 

Eprom-Programmierung 

Zunächst sei jedoch gesagt, daß alle 
ROMs im oberen Bereich des Spei¬ 
chers von der Adresse #C000 bis 
#FFFF eingeblendet werden. Jedes 
ROM besitzt einen sogenannten Hea¬ 
der-Block, der bei jedem ROM wie 
folgt aufgeteilt sein muß: 

#C000 DEFB Typ 
#C0()l DEFB Mark Number 
#C002 DEFB Version Number 
#C003 DEFB Modification Level 
#C004 DEFS External Command 
Table 

#C006 JP External Jump Table 

Die drei Bytes in den Adressen #C001 
bis #C003 können mit jedem beliebigen 
Wert beschrieben werden und dienen 
nur der Übersicht. Das erste Byte hin¬ 
gegen ist schon wichtiger. Der Kernel 
kennt drei verschiedene ROM-Typen 
und eine kleine Variation für das einge¬ 
baute BAS IC-ROM: 

#C000 DEFB #00 ; Vordergrund- 

ROM 

#C000 DEFB #()0+#80 ;ei ngebautes Vor- 
dergund-ROM 
#C0()0DEFB#02 ;Erweiterungs- 

ROM 

#C000DEFB#01 ;Hintergrund- 

ROM 

Typ-Byte #80: Im Typ-Byte des BA- 
SIC-RÖMs ist Bit 7 gesetzt. Das “On- 


Board-ROM” hat keine eigene Deco¬ 
dierungsschaltung für seine ROM-Sel- 
ect-Adresse. Jeder Lesezugriff auf ein 
ROM bezieht sich automatisch auf das 
BASIC-ROM. Es sei denn, es wird ex¬ 
plizit mit der Leitung ROMDIS von ei¬ 
nem anderen ROM ausgeblendet. 

Wenn der Kemel alle ROM-Adressen 
nach Hintergrund-ROMs absucht, er¬ 
kennt er am Typ-Byte #80, daß auf die¬ 
ser ROM-Select-Adresse kein anderes 
ROM installiert ist, weil hier das BA¬ 
SIC-ROM “durchschimmert”. 

Im Klartext bedeutet dies, daß überall, 
wo kein Eprom liegt, automatisch das 
BASIC-ROM liegt. 

Typ-Byte #00: ROMs, die Vorder¬ 
grundprogramme enthalten, werden 
mit dem Byte #00 gekennzeichnet. 
Typ-Byte #01; Alle ROMs, die keine 
eigenständige Software enthalten, son¬ 
dern nur zusätzliche Routinen, die von 
einem Vordergrundprogramm benutzt 
werden können, müssen als Hinter¬ 
grund-ROM markiert werden. 

Alle Hintergrund-ROMs sollten auf 
Select-Adressen von#01 bis #07 (CPC 


Eprom-Programmierer; 

Dobbertin 4003 


Pliilosoft 


Eproin-Karten: 


Dobbertin 

Dobbertin 

Eprom Programmer 

Microslyle 

RomboRonibox 

Rombo 

Rombox CPC 

Siren Software 

Eprom-Soflware: 


Alpha-ROM 


BCPL 

Amor 

Maxam 

Amor 

Maxam 1.5 

Amor 

MS800 


PromergePlus 

Amor 

Prospell 

Amor 

Proicxl 

Amor 

Rodos 

Romantic Robot 

Romdos 

Siren Software 

Time-Rom 


Utopia 

Amor 

X-DDOS 

Dobbertin 
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Know-how 


Be/ugsadrcssen fürEproni-Karton und Zubehör: 

Dobbert in Itidustrle-Elektronik, Brahmslraße 5.6835 BrühJ. Tel.: 06202/71417 
EDV-Oberineier, Bünder Straße 20,4972 Löhne. Tel05732/6126 
MB-Versand Köln, Post fach 50 i I 32,5000KÖln50.Tel.:02236/47108 

Wec.skeCompulcr-Elektronik,PotsdamerRingl0,7l50Backnang.Tel.:0719l/!528 


464) respektive #01 bis #0F (CPC 
664/6128) installiert werden, weil der 
Vektor KL ROM WALK nur diese 
ROM-Adressen ablVagt und auch nur 
für diese ROMs Zeiger auf deren reser¬ 
viertes RAM speichern kann. Das 
AMSDOS-ROM ist übrigens auch ein 
Hintergrund-ROM und trägt die Selek¬ 
tion #07. 

Typ-By!e#02: Sehr umfangreiche Vor- 
dergrundprogramnie können bis zu vier 
16-kByle-Blöcke enthalten. Diese 
müssen dann aufeinanderfolgende 
ROM-Select-Adressen besitzen. Nur 
das erste ROM darf in seinem Header 
als Vordergrund-ROM gekennzeichnet 
sein. Die bis zu drei nachfolgenden 
ROMs müssen als Erweiterungs- 
ROM.s deklariert werden. 

Vor allem mit Restart 2 (RST 2) ist es 
dabei möglich, von jedem ROM eines 
Hauptprogranims aus Vordergrundpro¬ 
gramme in “benachbarten” Erweite- 
rungs-ROMs aufzurufen. 

Weiter im Text 

Wir sind Jedoch noch nicht fertig mit 
der Erklärung des Eprom-Kopfes. Wie 
Sie aus der vorletzten Tabelle ersehen 
können, ist an der Adresse #C004 der 
Zeiger auf die External-Command-Ta- 
ble untergebrachl. In #C004 und #C00.5 
muß die Adre.sse stehen, ab der die Na¬ 
men der neuen RSX-Befehle unterge¬ 
bracht sind. 

Der erste Name hat jedoch eine doppel¬ 
te Bedeutung. Neben der Kennzeich¬ 


nung eines Befehls wird er dazu ver¬ 
wendet, den Namen des Eproms zu be¬ 
herbergen. Somit ist der erste Jump in 
der Exiernal-Jump-Table an #C()()6 die 
Inilialisierungsroutinedes ROMs. 
ln die.ser Routine können Vektoren ge- 
patcht werden, die Einschaltmeldung 
kann ausgegeben werden (zum Bei¬ 
spiel CPC-AMSTRAD-RÜM vl.O (c) 
1992 by DMV) und vieles mehr. Da 
meist auch RAM-Adressen initialisiert 
werden, ist es äußerst schlecht, wenn 
der Benutzer den ersten RSX der Com- 
mand Table eingibt. Er würde dadurch 
fürein Chaos sorgen oder eventuell den 
Computerzum Absturz bringen. 

Daher empfehlen sich Namen mitLeer- 
zeichen. Kommas oder anderen Son¬ 
derzeichen, die der BASIC-Interpreter 
nicht akzeptiert. Diese Lösung wurde 
zum Beispiel bei AMSDOS oder 
RDOS gewählt (‘‘CPM ROM” und 
“RDOSROM”). 

Wenn nun ein Eprom initialisiert wird, 
sind die Register beim Einsprung in 
#C006 wie folgt geladen: 

BC = letztes Byte des Memory-Pool 
(total) 

HL = letztes Byte des Memory-Pool 
(Vorschlag) 

DE = erstes Byte des Memory-Pool 


Also ist BC mit #B0FF, HL mit #ABFF 
und DEmit#004()geladen. 

Es werden somit die Speicherbereiche 
reservieit und die neuen Werte zuletzt 
an das Betriebssystem zurückgegeben. 
Man sollte die Werte, wenn man sie 
nicht verändern will, beim Einsprung 
direkt PUSHen und nachher wieder 
POPen. 

Initialisierung 

Bei der Entwicklung von EPROMS 
empfiehlt sich ein sogenanntes RAM- 
ROM, welches ROMs mit einem RAM 
emuliert. Diese Erweiterung wurde 
zum Beispiel in der damaligen Schnei¬ 
derware vorgestel It. Eine Kompletikar- 
le ist übrigens auch in Deutschland für 
CPC 464 und 664 erhältlich und kostet 
zwLschcn7üund 100 DM. 

Wer sich nun seine eigene ROM-Soft- 
ware schreibt, benötigt ein Eprom 
27128 (16 kByte) oder 27256 (32 
kByte, Dobbertin-Karte). Diese sind in 
fast jedem Elektronikladen für zirka 10 
DMcrhältlich. 

Eprom-Brenner sind jedoch teurer. 
Hier muß mit 300 DM gerechnet wer¬ 
den. 

Mike Behrendt/rs 



Alles, was das Herz begehrt. Hard- und Software rund um den Eprom 
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Selbstgebaut: RS232 

Eine serielle Schnittstelle im Eigenbau 


Anknüpfend an den DFU-Kurs in unserem Heft, bieten wir Ihnen hier eine 
serielle Schnittstelle RS232 zum Selbstbau. Der niedrige Preis und die uni¬ 
verselle Einsetzbarkeit sollten Grund genug sein, unverzüglich zum Löt¬ 


kolben zu greifen. 

Leser, die mit Interesse unseren DFÜ- 
Beitrag verfolgt haben, möchten sich 
nun vielleicht auch eine serielle 
Schnittstelle zulegcn. Das Angebot ist 
aber nicht allzu groß. Deshalb hier eine 
preisgünstige Variante zum Nachbau. 
Zur Verwendung kam in dieser Schal¬ 
tung ein integrierter V24-Treiber mit 
internen Spannungswandlern, wo¬ 
durch ein zusätzliches Netzteil entfallt. 
Baudrate und Übertragungsformal 
werden mit INF- und OUT-Befehlen 
per Software festgelegt. Eine Anpas- 
.sung an verschiedene DFÜ-Program- 
me ist somit unproblematisch. 

Die Schnittstelle kann im Bereich 
&F0DC bis &,FFDC adressiert werden, 
wobei für den CPC die Adressen 
&F8DC, &F9DC. &FADC und 
&FBDC vorgesehen sind (siehe auch 
CPC-Handbuch). Kernteil der Schal¬ 
tung i.st der "ACIA” MC6850, ein 
“'asynchroner Communications Inter¬ 
face Adapter’* aus der 6800-uP-Fami- 
lie. der wegen seines relativ niedrigen 
Preises von etwa 5 DM auch für Z-80- 
Systeme von Interesse ist. Der Schalt¬ 
kreis beinhaltet einen seriellen Sender 


und Empfänger, je ein Datenregister, 
ein Statusregister und ein Steuerregi¬ 
ster mit einer entsprechenden Steuerlo¬ 
gik. 

Steuerregister 

Mit dem im Steuerregister abgelegten 
8-Bit-Wort “wxxyyyzz" werden alle 
notwendigen Betriebsparameter einge¬ 
stellt. 

Reset und Baudrate “zz”: 

Bit 0 und 1 legen die Baudrate fest be¬ 
ziehungsweise führen einen Reset 
durch. Die Baudrate wird gebildet, in¬ 
dem die Taktfrequenz intern durch 64, 
16 oder 1 geteilt wird. Bei 19,2 kHz 
(38,4 kHz), wie in der vorliegenden 
Schaltung, sind folgende Baudraten 
möglich: 

wxxyyy 10: Cik/64 300 Bd 

int.Syn.(600 Bd) 
wxxyyyOl: CIk/l6I200Bd 

int.Syn.(24()0Bd) 
wxxyyyOO: Clk/1 19200Bd 

exl.Syn.(38400 Bd) 
wxxyyyll: RESET 


ljbertragungsformat“yyy”: 

Bit 2, 3 und 4 bestimmen das Übertra¬ 
gungsformal. Insgesamt können acht 
verschiedene Ubertragungsformate 
vereinbart werden: 

1. wxxOOOzz: 7-Bit, 2 Stopbits gerade 
Parität 

2. wxxOOlzz: 7-Bit, 2 Stopbits ungerade 
Parität 

3. wxxOlOzz: 7-Bit. l Stopbit gerade 
Parität 

4. wxxOIlzz: 7-Bit, 1 Stopbit ungerade 
Parität 

5. wxx 1 OOzz: 8-Bit, 2 Stopbits 

6. wxxlOlzz: 8-Bil, 1 Stopbit 

7. wxxIlOzz: 8-Bit.. l Stopbit gerade 
Parität 

8. wxxlllzz: 8-Bit. 1 Stopbit ungerade 
Parität 


Interruptsteuerung “xx” sendersei- 
tig: 

Mit den Bits 5 und 6 wird festgelegt, 
wie sich die Statusregistermeldung 
‘“SENDERDATENREGISTER leer” 
aus wirken soll. Es sind vier verschiede¬ 
ne Kombinationen möglich: 


1. wOOyyyzz: RTS=L 


kein Interrupt 

2. w0Iyyy2z; RTS=L 

Interrupt 

3. wl0yyyzz: RTS=:H 

kein Interrupt 

4. w 1 lyyyzz: RTS=Lkein Interrupt 
Leerzeichenausgabe 


Der Ausgang IRQ blieb in der Schal¬ 
tung unberücksichtigt, kann jedoch 
über die Abfrage des Statusregisters 
softwaremäßig behandelt werden. 

I nterruptsteuerung empfänger.seitig 
“w”: 

Ixxyyyzz: Wird dieses Bit gesetzt, er¬ 
folgt bei folgenden Statusmeldungen 
ein Interrupt: 


1. Empfängerdatenregistervoll 

2. Empfängerdatenregister Überlauf 

3. DCD-Eingang L->H (Data-Carrier- 
Deteci) 


In der vorliegenden Schaltung liegt 
DCD fest auf L-Pegel. 

Statusregister 

Das Stalu.sregister kann nur gelesen 
werden. Dieses geschieht im einfach¬ 
sten Fall durch den B ASIC-Befehl: 


PRim INP(Adr.) 
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Know-how 



Die komptene Schallun^ 

Man erhält eine Zahl, die erst nach einer 
Umwandlung in ein 8-Bil-Binärformai 
eine übersichtliche Aussage über die 
Betriebszuslände des ACIA zuläßl. 
Bii()->l: 

Das Datenregister des Empfängers ist 
voll. Das übertragene Wort ist komplett 
und kann im Rechner weilerverarbeitet 
werden. 

Bill->l: 

Das Datenregister des Senders ist leer. 
Es kann ein neues Zeichen gesendet 
werden. 

Bil2->l: 

Ein Modem hat signalisiert, daß kein 
Datenträger auf der Übertragungs¬ 
strecke vorhanden ist. In der vorliegen¬ 
den Schaltung ist jedoch Bit 2 immer 
aufO. 

Bil3: 

Es wird der logische Zustand des CTS- 
Eingangs angezeigt. 

Bit3->(): 

Modem signalisiert; "CLEAR TO 
SEND". 

Bil3->1: 

Sender stoppt die Übertragung von Da¬ 
ten. 

Bit4-> !: 

Synchronisation oder Datenübertra¬ 
gung der Übertragungsstrecke ist nicht 
in Ordnung. 

Bit5->1: 

Dutenüberlauf auf der Empfangs¬ 
strecke. Daten wurden zw-ar empfan¬ 
gen. aber nicht im Daienregister abge¬ 
speichert. 

Bit6->1: 

Es liegt ein Paritätsfehler vor. Die Pa¬ 
rität der empfangenen Bits entspricht 


nicht der vereinbarten Parität. 

Bit7-> 1: 

Der Intcrruptausgang ist aktiviert (L- 
Pegel). Dieses Bit wird zurückgesetzl. 
entweder durch das .Schreiben des Sen¬ 
derdatenregisters oder durch das Uesen 
des Empfangsregisters. 

Einfachste Befehls.sequenz: 

1.0UT&F8DC.3 

Masterresei 

2.0ut&F8DC,2()-Kl 

Übertragungsformat vereinbaren: 

kein Interrupt 

8-Biis 

1 Stopbil 

1200 Baud 

3.IFBIN$(INP(&F8DC) 

AND2 

THEN OUT&F8DD.'Datum’ 

Abfrage des Statusregisters, ob Sende- 
regisier leer, wenn ja. dann Zeichen 
aussenden 

4.IFBIN.S(INP(&F8DC) 

ANDl 

THEN 'Datum’=INP(&F8DD) 

Abfrage des Statusregisters, ob Hmp- 
fangsregisler voll, wenn ja. dann Zei¬ 
cheneinlesen 

Nun zu Aufbau und Inbetriebnahmeder 
.Schnittstelle. Die Platine wird bis auf 
die ICs nach Bestückungsplan be¬ 
stückt. Die 2.‘5polige D-Buchse und der 
zweipolige .Schiebeschalier werden 
von der Lötseite aufgeiötel (siehe Be- 
stückungsplan). Um die mechanische 
Belastung des Erw'citcrungsports mög¬ 
lichst gering zu halten, ermpfiehlt es 
sich, die D-Buch.se mit einem Kabel¬ 


schwanz anzuschließen (Foto), ln un¬ 
serem Testgerät wurden ebenfalls die 
andere Buchse und der Schiebeschalter 
von der Leiterplatte abgesetzt ange¬ 
bracht. Steht keine Federleiste (Slot) In 
Wire-Wrap-Ausführung mit langen 
Anschlußsiiften zur Verfügung, sollte 
man auf eine minimale Bauteilhohe 
achten, damit beim Aufstecken der 
Schaltung auf den Erweiterungsbus des 
CPC keine Platzprobleme aufireten. 
Zwangsläufig muß dann auch auf IC- 
Sockcl verzichtet werden. Die ICs soll¬ 
ten in folgender Reihenfolge eingelötet 
und die einzelnen Schaltungsteile sepa¬ 
rat auf ihre Funktion überprüft w’erden: 

L IC2HEF4()60(Taklgenerator): 

An IC! Pin 3. 4 muß eine Rechteck¬ 
spannung mit der Frequenz 19.2 kHz 
(Sla) beziehung.swei.se 38.4 kHz (SIb) 
anstehen. 

2. IC3 74LS138 (Adreßdecüder): 

Pin 9/IC! muß bei offenen Eingängen 
auf H-Pegel liegen. Legt man Pin 4 und 
5/IC3 auf CiND. wechselt Pin 9/IC I auf 
L-Pegel. 

3. ICS 74LS85 (Adreßdecoder), 
(4-Bil-Kümparator): 

Pin 14/lCI muß auf H-Pegel liegen. 
wenndie4-Bil-Kombinationan Pin 10. 
12. 13, i5/IC5 der 4-Bit-Kombination 
am Schalter S2 entspricht. Bei Un¬ 
gleichheit wechselt Pin 14/ICl aufL- 
Pegel. 


Haiiteile-Liste: 

ICI 

MC 6850 

IC2 

HEP4()6()B 

IC3 

74LSI38 

IC4 

MAX 232 

IC5 

74LS8.5 

C1,C4,C9 

0,1 |jF 

C2 

33pF 

C3 

100 pF 

C.^-C8 

22|aF/16V 


(1 pr'bis47pFmöglich) 

RI 

1 MQ 

R2 

lOkD 

R3-R6 

4.7 kD 

Dl-1X5 

4 l48o.ä 

Q 

Quarz 4 MHz 

Sl 

2xUM Schiebeschalier 

S2 

Dll’-Schaiter4po!ig 

D-Stecker 

DB-2.5-S(Buchse)25polig 

Fedcrlei.sic (SlQl)2x25polig 


RM2..^(464/664) 
Fedcrleiste (Stecker.Centronics) 
50polig(6l28) 
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Know-how 


Skizze: Bestückung der RS 232 


Das Platinenlayout 




4.IC4MAX232oderlCL232 

{V-24-Treiber); 

An Pin 2/1C4 muß eine Spannung von 
etwa +10 V und an Pin 6/IC4 eine Span¬ 
nung von etwa -10 V meßbar sein. 
5.IC1MC6850(ACIA): 

Die Überprüfung dieses ICs kann nur 
am Rechner erfolgen. Vorausgehen 
sollte jedoch eine sorgfältige optische 
Kontrolle der gesamten Platine auf 
Kurzschlüsse und Unterbrechungen 
der Leiterbahnen und auf Löt.schlüsse. 
Zusätzlich kann außerdem die Gesaml- 
stromaufnahme gemessen werden, die 
I OObis 120 mA betragen darf. 

Nun kann die Gesamlschaltung einem 
Funktionstest unterzogen werden. 


Zunächst wird die Schnittstelle adres¬ 
siert. Das kurze Testprogramm ver¬ 
wendet die Adresse FSDCh, das bedeu¬ 
tet S2a. b, c werden geschlossen, S2d 
bleibt geöffnet. Die Leitungen TxD und 
Rx D sowie RTS und CTS werden an der 
D-Buchse kurzgeschlossen. Der ge¬ 
samte Zeichensatz wird nun in einer 
Schleife seriell über TxD gesendet und 
über RxD wieder seriell inden Rechner 
eingelescn. Auf dem Bildschirm wer¬ 
den die empfangenen Zeichen invers 
dargestelli und mit den gesendeten ver¬ 
glichen. Ein Aufheben des Kurzschlus¬ 
ses zwischen CTS und RTS bewirkt ei¬ 
ne Unterbrechung der Übertragung. 

jg 


Literatiirhinwei.se 

Datenblatt MC 6850 
Fa. MOTOROLA 

Datenblatt MAX 232 
Fa.SE-Elektronik 

Datenbuch "LOCMOS-Reihe“ 
Fa.Valvo 

TTL-Dala-Book 
Fa. Texas Instruments 


10 'RS 232 Test: RS232TST.BAS 
20 '(c) 1992 CPC International 
30 ' 

40 MODE l:PAPER 0: PEN 1 
50 PRINT" RS 232 

60 PRINT"- 

70 PRINT:PRINT:PRINT 
80 PRrNT"Baudrate: 300 Bd ( 600 Bd] 


[1336) 

[1693] 

[117) 

( 1716 ) 

[729 ] 
(2205) 
[1082] 
a) S1 [3883) 


90 PRINT" 1200 Bd [2400 Bd) b) S1 [2854] 

b 

100 PRINT:PRINT :INPUT"Welche Baudrate? ";b [2983) 


S 

110 IF b$="a" THEN bd=2:GOTO 130 (1169) 

120 IF bSs'’b" THEN bd=l ELSE GOTO 100 [1535] 

130 LOCATE 1,18:PRINT" TxD und RxD kurzsch [4704] 
Hessen 

140 PRINT " RTS und CTS kurzschliessen [3724] 

150 PRINT:PRINT ['^'iS] 

160 INPUT’'<ENTER>" ;eS [ 1495 ] 


180 OUT &F0DC,3 
190 OUT SF8DC,16+txi 
200 CLS 

210 PRINT CHRS(24);" RS-232 Test 

";CHRS(24) 

220 IF INP(&F8DC) AND 8 THEN PRINT"CTS und 
RTC nicht kurzgeschlossen":END 
230 FOR a=32 TO 255 

240 IF INP(&F8DC) AND 2 THEN OUT &F8DD,a; 
GOTO 250 ELSE 240 

250 IF INP(&F8DC} AND 1 THEN GOTO 260 ELSE 
250 

260 b=INP(&F8DD) 

270 PRINT " "; CHRS(a);CHR$(24);CHRS(b);CH 
R${24);" "; 

280 IF aob THEN PRINT CHRS ( 7 ); "Fehler 

BINS{INP(&F8DC),8):END 

290 NEXT 

300 loacate 1,1 

310 END 


[271] 

[497] 

[91] 

[3056] 

[3241 ] 

[819] 

[ 2100 ] 

[1268] 

[992] 

[2873] 

[2507] 

[350] 

[ 473 ] 
[ 110 ] 
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Kleinanzeigen 


Biete Software 


PD-SOFTWARE-,65bis2,- 
Für IBM/Kompat. Kat-Disk, gratis. 

M, Karbach.RemschsiderStr. 18 
5650 Solingen 1 G 


Verkaufe DBase II für CRC 6128 
mit Buch! Vom Markt-und-Technik- 
Verlag.FPIOODM. 

Tel. 023 02/516 72 ab 18Uhr 


‘ cpc & joyce Public Domain Disks 
’lnfogegen2,-DMin Briefmarken anfordern; 
‘PDI, Pf 1118,0-6464 Linsengericht C 

SUPERGÜNSTIGE CPC-SOFT- U. -HARD¬ 
WARE, FD1, ROMBOX. MAXAM, SPIELE 
UVM.-NUR FREITAG U.SAMSTAG 19UHR 
07971/4637-RALF VERLANGEN 


Biete Hardware 


CPC464 + GT85 + ODI + LtTERATUR+ 
SOFTWARE DM 300 TEL 0 71 95/44 70 


CPC-464 incl. Farbmonitor, DDI-1 
Speichererweiterung 512 KB. 

Jede Menge Software, Zeitschr., 
Handbücher, über 100 Disketten, 
und vieles mehr!!! FP; 550!l DM 
Einfach anrufen und abholen. 
Tel.:0211/21 7363 
Bringen? = 50,- DM in Düsseldorf! 


CPC 464 Color. 512K, DD1, VORTEX 
F1 XRS, NLQ4C1.Dataphon, 

DBASEII, 

div. Progr, + Zeitschriften 

FP 950 DM - 02 03-33 83 61 ab 18 Uhr 


CPC 464 Grünmon,, Farb-Modulator, 
Vorlex-Doppelfloppy, CP/M, Joyst., 
Para 3.0, Literatur, nach Gebot 
P.Helfgen, 0 68 42/68 34 


CPC6128plus/SW/+ MPV001 + HD20. 
KOMPLEH. VB1200. TEL 0 8671/1 29 58 


VERKAUFE GEBRAUCHTE GT 65- 
GRÜNMONITOREäSO DM: 0521/1 51 10 


Suche Software 


Suche Progr. zur Börse u. höhe¬ 
ren Mathem. (umfangr. Fktionsanal,, 
Matrizen,...) Ch. Sleinebrunner. 
Dreibergstr. 16a. 8520 Erlangen 


Suche Hardware 


CLUB SUCHT GEBRAUCHTE 3-ZOLL- 
FLOPPY FÜR CPC 464, MAX, 280.- DMI 
ANGEBOTE BITTE AN: 

SASCHA OPPERER, A-6773 VANDANS 
470. AUSTRIA. ODER 0 55 56/46 57 ! 
(SASCHA VERLANGEN, NUR SONNTAG) 


MP2 Modulator mit Netzteil 
Tel, 0 62-63 10 61 Schweiz 


SUCHE FÜR CPC 6128 preiswert 
FLOPPY, RAM. Soft usw, 

S. Quietzsch, 

Bahnhofstr, 28, 7910 Neu-Ulm 


SUCHE FUER CPC464 DDI-1 MIT 
CONTROLLER TEL, 0 22 35/7 79 61 


HANDBÜCHER FÜR PCI 512 T, 05 76 64 63 


Tausch 


CPC-Games. Liste an: Michael Har- 
tinger, Hueb 67, A-4780 Schärding 


Verschiedenes 


Farbbänder f. JOYCE, PCW 9512. 

NLQ 401, DMP 2000 ab9,- 
Etiketten, Disketten (3" DM 63) 
u. weit, EDV-Zubehör, Kostenl. 
Preislisten anfordern. W, Kuhn, 
EDV-Zubehör, Hessenstr. 7, 
6340Dillenburg2,0 27 71/3 2 6 88 G 


Club 


CPC-POWER INTERNATIONAL #10 
Großer Cebit’92-Bericht. MP-3- 
Test, Softwaretests, Assembler- & 
Basic-Tips/Kurse! 30 DIN A4-S. 
stark mit 5,25'’-Coverdisc nur 
5,- DM (bar/scheck) bei CPC- 
POVYER, PF 50 11 32.5000 Köln 50. 
(Nur Vorkasse, keine PLK-Adr.l) 


Der CPC-Userclub ist da! 
Überregional und unabhängig! Für alle 
CPC-Rechner bieten wir z.B. mll, eine 
Clubzeitschrift. 

Unverb. Info über alle Leistungen 
gegen 0,60 Porto von R. Knorre, 
Postfach 20 01 02, 5600 Wuppertal, 
Stichwort CPC 


•CPC-CHALLENGE‘ DAS CPC- 
Diskmagazinl 3'- oder S.aS"- 
Disk plus 1,40 DM RP an CPC- 
CHALLENGE, Pf 18 01 43, 5600 
Wuppertal 1 


USER-CLUB für Amstrad/Schneider- 
PC-1640/1512-Anwender sucht noch 
Mitglieder. Inform.- und Erf.- 
Austausch stehen an erster Stelle. 
Info kostenlos bei Willy Stern. 
Kennedyslr. 38.8039 Puchheim. 

Tel. 0 89/8 00 25 45 Anfragen auch 
unter BTX 0 89/80 89 12, es wird 
gleich geantwortet. 


Kleinanzeige 

Eine Gelegenheitsanzeige in un¬ 
serem Kleinanzeigen-Markt macht 
sich immer bezahlt, ob Sie tau¬ 
schen. verkaufen oder erwerben 
wollen! 

Und so wird’s gemacht: 

Kreuzen Sie bitte an. in welcher 
Rubrik Ihre Anzeige erscheinen 
soll und ob sie privat oder gewerb¬ 
lich ist. Dann schreiben Sie Ihren 
Text so In das vorgezeichnete 
Feld, daß jeder Buchstabe, jedes 
Satzzeichen oder jeder Wortzwi¬ 
schenraum ein markiertes Käst¬ 
chen austCillt. Jetzt brauchen Sie 
nur noch die Zeilen zu zähl^, den 
Preis zu berechnen, einen Ver¬ 
rechnungsscheck auszufüllen und 
fertig ist Ihre Gelegenheitsan¬ 
zeige. 

Sitte beachten Sie! 

Aus verwaltungstechnischen Grün¬ 
den kann der Abdruck Ihrer Klein¬ 
anzeige nur gegen Vorkasse 
erfolgen. 


C^Amstrad 

INICRNATIONAL 


Coupon ausschneiden 
und senden an: 


DMV-Verlag 
CPC-lnternational 
Postfach 250 

W-3440 Eschwege 


Kleinanzeigen-Markt 


r' 


Kieinanzeigen-Coupon 


Private Anzeigen: Nur DM 3,- je angefangene Zeile. 

Geschäftliche Empfehlungen: DM 8.- je angefangene Zeile, zzgl. gesetzlicher Mehrwertsteuer. 

Bitte veröffentlichen Sie meine Anzeige in der nächsterreichbaren CPC Amstrad für 

□ private Zwecke D gewerbliche Zwecke (gewerbliche Anzeigen werden mit G gekennzeichnet) 


Das ist der Text: (Bitte deutlich in Druckbuchstaben schreiben!) 



Bei Angeboten: Ich bestätige, daß ich alle Rechte an den angebotenen Waren besitze. 


Datum 


Unterschrift (bei Minderjährigen des gesetzlichen Vertreters) 


L 


O Die Anzeige soll als Chiffre-Anzeige erscheinen (nur bei Prival-Anzeige). Chiffre-Gebühr DM 10,- inkl. MwSl. zzgl, zum 
Anzeigenpreis. 

In dieser Rubrik; _ 

O Biete an (ZI Suche D Tausch Name 

□ Hardware □ Hardware Dciub _ 

□ Software O Software □ Verschiedenes Straße, Postfach 

□ Dan Betrag bezahle ich mit dem beigefügten - 

Verrechnungsscheck. PLZ/Ort 
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Briefe 



Ronald Heitmann aus Appen (links) bekam von Chefredakteur Peter 
Schmilz f rechts) seinen CPC 6128 plus mit Farbmonitor üherreichi. Der 
zweite Preis, ein CPC 464 plus mir Monochromhildschirni. ^in^ an Mar¬ 
tin Schmid (Mitte) aus Mooshurg 

Digiglobe-Sieger 
in Eschwege 

In Ausgabe 2/3'92 der CPC International haben wir die 
Sieger des grolk'n Digiglobe-Programmierwettbewerbs 
bekanntgegeben und das beste Programm des Wettbe¬ 
werbs abgedruckt. Nun haben auch diedrei Hauptpreise 
zu ihren Besitzern gefunden: Großes Händeschütteln und 
Gew'innübergabe in der Redaktion waren angesagt. 


Nachdem wir bereits in Aus¬ 
gabe 4/5’91 derCPC Interna¬ 
tional unseren großen Pro- 
grammierwetlbewerb ge¬ 
startet hatten, machten sich 
unsere Leser quer durchs 
Land an die Arbeit: Ein ver¬ 
bessertes Globus-Programm 
galt es zu entwickeln. Konti¬ 
nente, Meridiane, Animati¬ 
onsphasen und Bedienungs¬ 
logik hießen die Gegner im 
Kampf um die attraktiven 
Preise in diesem Wettbe¬ 
werb. Für die drei Besten hal¬ 
ten wir uns etwas Besonderes 
ausgedacht: Sie sollten ihre 
Preise in unserer Redaktion 
persönlich in Empfang neh¬ 
men, und zwar aus der Hand 
des Chefredakteurs. 

Ronald Heitmann aus Appen 
bei Hamburg hatte mit sei¬ 
nem “Winglobe” das Sieger¬ 
programm des Wettbewerbs 
geliefert. Sein Li.sting er¬ 


schien in Heft 2/3’92. “Win- 
globe” verwöhnt seinen Be¬ 
nutzer mit einer komforta¬ 
blen grafischen Obcrlläche. 
Der begeisterte Assembler- 
Programmierer war gerade 
mitten im Abiturstreß, konn¬ 
te aber zwischen den Klausu¬ 
ren auf einen Sprung nach 
Eschwege kommen. Hier 
verblüffte er die Redaktion 
mit neuen Programmprojek¬ 
ten: ein Dcsktop-Publishing- 
System mit Farbdrucker-Un¬ 
terstützung. Die Probeaus¬ 
drucke, die er uns zeigte, las¬ 
sen eine kleine Sensation er¬ 
warten. 

Der zweite Sieger, Marlin 
Schmid, mußte früh aufstc- 
lien: Bereits kurz nach fünf 
Uhr früh stieg er in Moos¬ 
burg bei München in den 
Zug, um gute .sechs Stunden 
später bei uns in Nordhessen 
anzukommen. Seine Digi- 


globe-Version. die auf der 
DATABOX-Diskette 2/3’92 
zu finden ist, besticht beson¬ 
ders durch ihr Tempo. Durch 
Einbau von Maschinencode 
ins Basic-Listing konnte er 
den Zeitbedarf für den Well¬ 
kugel-Grafikaufbau auf we¬ 
nige Sekunden reduzieren. 
Außerdem verpaßte er dem 
Globusprogramm eine Druck¬ 
funktion. 

Martin Schmid ist sozusagen 
“vom Fach”: Er studiert In¬ 
formatik in München und ist 
auf dem Weg zum Diplom- 
Informatiker. Allerdings hat, 
wie er uns berichtete, sein 
Studium viel zu wenig mit 
der Computer^,! zu tun. Ma¬ 
thematik kompliziertester 
Sorte ist sein tägliches Brot. 
Er benutzt den CPC in erster 
Linie zum Programmieren, 
rechnet allerdings damit, 
sich doch irgendwann einen 
PC anschaffen zu müssen: 
Viele wichtige Program¬ 
miersprachen sind auf Am- 
strads “Kleinen” leider nie 
implementiert worden. 

Dr. Karl-Günter Prusseit aus 
Kollmar bei Glückstadt im 
schönen Schleswig-Holstein 
hatte mit Globus überzeugt 
und war aus dem Wettbewerb 
als dritter Sieger hervorge¬ 
gangen. Aus beruflichen 
Gründen konnte der begei¬ 



sterte Hobby-Seemann lei¬ 
der nicht zur Preisübergabe 
nach Eschwege kommen. 
Daher erreichte sein Preis ihn 
per Post. Dieser Preis kann 
sich allerdings sehen lassen: 
ein 24-Nadel-Drucker von 
Seikosha im Wert von rund 
700 Mark. Dieser SL-92 plus 
ist wie geschaffen für CPC- 
ler: Mil maximal 240 Zei¬ 
chen pro Sekunde druckt er 
enonn schnell. Im LQ-Mo- 
dus liefert er ein laserähnlich 
gutes Schriftbild. Da er Ep- 
sons LQ 850 emuliert, hat er 
auch mit den gängigen Gra¬ 
fikprogrammen auf dem 
CPC keinerlei Probleme. 
“Weiße Streifen” bei der 
Ausgabe von 9-Nadel-Grafi- 
ken, wie man sie von manch 
anderem 24-Nadler kennt, 
sind für diesen Drucker kein 
Thema. 

Ronald Heitmann und Mar¬ 
tin Schmid konnten Eschwe¬ 
ge bei ihrem Besuch zwar nur 
von einer etwas regnerischen 
Seite sehen, aber interessant 
war es doch: In den verschie¬ 
denen Abteilungen des Ver¬ 
lags konnten sie sehen, wie 
unsere Zeitschriften Schritt 
für Schritt entstehen, vom 
Manuskript über das Foto bis 
hin zur fertigen Druckfilm- 
mappe. Ein kleiner Ausflug 
zur ehemaligen DDR-Gren- 
ze, die nur eine Viertelstunde 
vom Verlag entfernt ist, run¬ 
dete den Besuch ab. Wir ha¬ 
ben uns über die Gäste ge¬ 
freut und wünschen allen 
drei Gewinnern noch viel 
Freude mit ihren Preisen. 

sz 

Unten: Der dritte Preis: ein 
Seikosha SL-92 plus 


Oben: Dr. Karl- 
Günter Prusseit 
aus Kollmar 
schrieb 
"Globus" und 
gewann damit 
den dritten Preis 
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CPC 


BILLY BUBBLE und Vor¬ 
tex BOS 2.1 

Ich hin im Besitz einer Vor- 
tex-Speichererweiteruiifi mit 
BOS 2.J und habe das Pro¬ 
gramm BILLY BUBBLE wie 
folgt auch mit dieser Konfi¬ 
guration lauffähig gemacht. 
Lim Listing BILLY.LDR die 
Zeile öOändern: 

60 SAVE"HELP.BIN",B,&CO 
00 ,&2F44:END 

2. Den Computer zurückset¬ 
zen. 

3. VBOS-Befehle eingeben: 

IBOS,0,100,0,0 (nicht 
bei Version 1.0) 

I BANK,5:LOAD"HELP.BIN" 
,&C000 :CALL &COOO 

Arnd Bergmann, Witten 


CPC 

Laufwerke am CPC 

Vor kurzem habe ich mir das 
5,25-Zoll-Disketienlaußi'erk 
BASF AG 6I28C gekauft. 
Bisher ist es mir jedoch nicht 
gelungen, dieses an meinen 
6128 anzuschließen, obwohl 
es einen Shugart-Bus besitzt. 
Ist hei diesem Laufwerk et¬ 
was Besonderes zu beach¬ 
ten ? 

Thomas Schiffkowski, 
Tuttlingen 

Leider besitzen wir keinerlei 
Unterlagen über dieses Lauf¬ 
werk, so das wir diese Frage 
an unsere Leser weitergeben 
müssen. 


CPC 


ConText druckt nicht mit 
dem Plus 

Ich habe mir vor kurzem ei¬ 
nen CPC 6128 plus ange¬ 
schafft, mit dem ich rundum 
zufrieden hin. Leider habe 
ich auch mit der Software des 
alten CPCs einige Probleme. 
Wenn ich so zum Beispiel hei 
ConText den Ausdruck mit 


“D” starte, geht nichts mehr. 
Werweißmehr? 

Horst Fritsch, Herrieden 


CPC 

Dobbertin-Dokumentatio- 

nen 

Ich hin schon seit längerem 
Besitzer eines CPCs. Mit der 
Zeit habe ich so manche 
Hardware-Erweiterungen 
angeschafft und deren Vor- 
und Nachteile feststellen 
können. 

Leider kann es bei einigen 
Programmen aus der CPC 
International zu Schwierig¬ 
keiten kommen, oder die vor¬ 
handenen Erweiterungen 
werden nicht unterstützt. 

Da wir CPCler Zusammen¬ 
halten müssen, möchte ich 
den Anfang machen und den 
Programmierern unter den 
Lesern die Dohhertin-Doku- 
mentation zugänglich ma¬ 
chen. 

Wer also an dieser für die 
RAM-Disk. Timerom+ oder 
die HD20 interessiert ist, der 
sollte eine 3-Zoll-Diskette 
mit Rückporto an mich sen¬ 
den. 

MichaelVogl, Grevenbroich 

Nach Rücksprache mit Herrn 
Dobbertin besteht auch von 
dieser Seite kein Einwand. 
Daher hier die Adresse: 
Michael Vogl 
Kirchstraßeö 
4048 Grevenbroich 4 


PCW 

Lastjoy 

Wie Sie sicherlich schon ge¬ 
merkt haben, wurden in dem 
Programm Lastjoy zwei Va¬ 
riablen vertauscht. In Zeile 
1690 muß deshalbdie Variable 
“e$(5.nr in '‘e$(4,n)”: folg¬ 
lich muß auch in Zeile 1710 
von “e$(4,n)” auf “e$(5,n)” 
korrigiert werden. Für den 
korrekten Ausdruck der Li.sten 
beziehungsweise der Summen 
am Ende muß die Zeile 3230 
geändert werden: Aus 

“SPC(8rwird“SPC(6r. 


CPC 


Von hier nach da 

Ich suche ein kleines Pro¬ 
gramm. mit dem man durch 
die Eingabe der Koordinaten 
Nord. Süd, West. Ost die Ent¬ 
fernung von zwei Orten auf 
der Erde berechnen lassen 
kann. Ich weiß, das es so ein 
Programm einmal gab, nur 
kenne ich die Quelle nicht 
mehr. 

Helmut Heese, Tosterglope 


CPC 

dk’Tronics Silicon Disk & 
CP/M 

Seit ich meine dk'tronics Sili¬ 
con Disk (256 KByte und256 
KByte Speichererweiterung) 
habe, laufen auf meinem 
CPC verschiedene Program¬ 
me nicht mehr einwandfrei. 
Da ich die Silicon Disk fast 
nur unter CPIM benutze. 


kann ich meistens unter 
AMSDOS auf sie verzichten. 
Deshalb habe ich folgende 
Überlegung angestellt: 
Wenn ich einen Teil des Spei¬ 
chers der Silicon Disk abzie¬ 
he, der das SDOS enthält, 
müßte CPIM die Silicon Disk 
trozdem nutzen, da CPIM für 
die Silicon Disk umgepatchi 
wurde. 

Dies setzt natürlich voraus, 
das CPIM nicht auf die Rou¬ 
tinen im ROM zurückgreift. 
Gesagt, getan. Ich habe also 
den oben genannten Teil ent¬ 
fernt und meinen CPC wie¬ 
der eingeschaltet. Er verhielt 
sich völlig normal, als würde 
die Silicon Disk nicht existie¬ 
ren. Als ich CPIM Plus dann 
startete, meldete sich die Si¬ 
licon Disk wie üblich mit der 
Speichererweiterung, und 
zwar mit444 KByte. 

Danach startete ich noch 
CPlM 2.2, und es wurde ge¬ 
meldet. das 254 von 256 
KByte frei sind, also alles 


Wir sind ganz Ohr... 

...für Ihre Fragen und Anregungen, was unser Heft betrifft — 
und alles andere rund um CPC oder PCW. Wollen Sie ein selbst¬ 
geschriebenes Programm im Heft unterbringen? Kennen Sie ein 
brandneues Programm, über das wir unbedingt etwas schreiben 
sollten? Kommen Sie mit einem der abgedruckten Listings nicht 
klar? Oder wollen Sie einfach mal mit einem von uns eine Runde 
fachsimpeln? 

Dann ist unsere 

Redaktions-Hotline 

auch für Sie interessant. 

Sie sind herzlich cingeladen - wir wissen zwar nicht auf Jede 
Frage die richtige Antwort, aber mancher Knoten löst sich trotz¬ 
dem schon am Telefon. 

Jeden Dienstag von 16 bis 19 Uhr 

hängt das komplette Redaktionsteam der CPC Ainstrad Interna¬ 
tiona! für Sie an der Leitung. Hier unsere Telefonnummern: 


g- 


Jörg Gurowski üg) Rulf Schößier (rs) Peter Schmitz (sz) 

05651/809 - 751 05651/809-752 0 56 5/ / 8 09 - 7 53 
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Wieder einmal möchte sich 
ein User-Cluh vorstellen, 
der sich ausschließlich mit 
dem CPC heschüftigt. Doch 
zuvor noch einmal etwas 
Allgemeines: 

Wenn auch Sie Ihren Club 
vorstellen möchten, dann 
können Sie dies tun. Alles, 
was wir dazu benötigen, ist 
Ihre Anschrift, der Name 
des User-Clubs und am al- 
lerv^'ichtigslen: viele Infor¬ 
mationen über den User- 
Cluh. 

Hajemara-Team 

ln Schwendi hai sich eine 
Gruppe von CPC-Usern zu¬ 
sammengefunden. die seil 
1987 ihr Unwesen treiben. 


Offene Ecke 

Da viele Kontaklc zu CPC- 
Fachleuten in Deutschland, 
Österreich und Frankreich 
bestehen, dürfte sich dieser 
Club hervorragend für Ein¬ 
steiger eignen. Selbstver¬ 
ständlich bietet der Club 
auch Interessantes für die 
Anwender, die in der Benut¬ 
zung und Programmierung 
des CPC firm sind. 

So wird zum Beispiel ein ei¬ 
genes Fanzine mit dem 
klangvollen Namen “Der 
Rundschlag” angeboten. von 
dem bisher schon fünf Aus¬ 
gaben erschienen sind. 

“Der Rundschlag” ist eine 
Zeitschrift, die eine Menge 
Infos und Fragen von Lesern 
enthält. Gestaltet wird er mit 


Programmen wie ConText, 
ArtWorx, Pro Design und 
Timesmaker. 

Aber der Club hat noch etwas 
Außergewöhnliches zu bie¬ 
ten. In einem lockeren, infor¬ 
mativen Sammelsurium gibt 
es ein CPC-Lexikon. Jedes 
der Mitglieder ist angehal- 
ten, seine Definition für die 
im “Rundschlag” jeweils an¬ 
gebotenen Begriffe beizu¬ 
steuern. 

Wer also etwas mehr über 
den Club oder über den 
“Rundschlag” erfahren 
möchte, wende sich an fol¬ 
gende Adresse: 

BIOS 

Postfach 0025 
D-7959 Schwendi 


CPC 


ganz normal. Außerdem hin 
ich noch auf folgendes ge¬ 
kommen: Sollte ich doch ein¬ 
mal SDOS brauchen, muß 
ich nicht erst die Speicherer¬ 
weiterung abziehen, den 
ROM-Teil aufstecken und 
dann wieder die Speicherer¬ 
weiterung. Es reicht, wenn 
ich die Speichererweiterung 
hinten an den Aufbau stecke. 
Noch ein kleiner Tip am Ran¬ 
de: Die mit "iSETCPM" er¬ 
zeugte Datei SDISC.COM 
kann auch aus den zweiten 64 
KByte des CPC 6128 eine 
kleine RAM-Disk mit immer¬ 
hin 62 KByte freien Speicher 
erzeugen. 

CP/M 2.2 muß jedoch vor 
dem er.sten Aufruf mit den 
beiden Befehlen "MOVCPM 
176^" und ‘SYSGEN 
geändert werden. Vorsichts¬ 
halber sei allerdings er¬ 
wähnt. daß die Firma dk’tro- 
nics auf die Datei 
SDISC.CÖM Urheber- 
rechtsansprüche hat und ei¬ 
ne Weitergabe an 6128-Be- 
nutzer ohne dk'tronic.s-Er- 
weiferung nicht rechtmäßig 
ist. 

Stephan Sommer, Murnau 


CPC 


Diskette ausgetrickst (CPC 
2/3’92) 

Hier noch eine Korrektur zu 
unserer Antwort auf den 
Leserbriefseiten: XDDOS 
benötigt nicht AMSDOS 
zum Betrieb, sondern ist ein 
völlig eigenständiges Dis- 
ketten-DOS. Wenn Jedoch 
auch AMSDOS vorhanden 
i.st, wird AMSDOS wieder 
deinitialisiert und die Routi¬ 
nen im RAM auf das XD- 
DOS-Rom geleitet. 


CPC 


LaCuisine 

Bei La Cuisine aus dem Son¬ 
derheft 8 ertönt bei mir nach 
Auswahl der Spielstärke 
noch eine Melodie, danach 
stürzt das Programm ab. Des 
weiteren verwendete ich den 


Lader aus der CPC 3'90. 
doch auch hier keine Besse¬ 
rung! 

Stefan llillenbrand. 

Wolferstadt 

Das Programm La Cuisine 
läuft auf den in der Redaktion 
zur Verfügung stehenden 
Geräten einwandfrei. Viel¬ 
leicht liegt dies jedoch an den 
unterschiedlichen CPC-Mo- 
dellen. 

Sollte einer unserer Leser 
dasselbe Problem und zufäl¬ 
lig auch eine Lösung parat 
haben, so möge er sich doch 
bitte melden. 


CPC/PCW 


Lesereinsendungen 

Ich habe eine Anwendung ge¬ 
schrieben. die eine bereits 
veröffentlichte Window- 
Routine verwendet. Muß ich 
mir eine Genehmigung ein¬ 
holen, wenn ich es Ihnen an¬ 
biete? 

Klaus Kramer, Hamburg 

Bei Programmeinsendun¬ 
gen, die bereits veröffent¬ 
lichte Routinen beziehungs¬ 
weise Utilities verwenden, 
sollten Sie die Autorenna¬ 
men, den Namen des Heftes 


und die Ausgabennummer 
mit einreichen. 


CPC 


DrunimingCPC 

Ich habe die Listings zum 
Drumming CPC abgetippt, 
und auch die Prüfsummen 
.sind korrekt. Starte ich aber 
die Lader, gibt mir das Pro¬ 
gramm ab Zeile 243 Prüf¬ 
summenfehler aus. Auch 
nach Entfernung der Prüf¬ 
summenroutine läuft das 
Programm nicht. 

Könnte es sich möglichcr- 
wei.se um einen Druckfehler 
handeln? 

Peter Wedekind. Goslar 

Ja, mit Ihrer Vermutung lie¬ 
gen Sie ganz richtig. Leider 
wurde beim Satz der Listings 
ein Fehler gemacht. Die bei¬ 
den Listings wurden ab Zeile 
243 vertau.schi. Tippen Sie 
deshalb das Listing DRUM- 
MC.LDR bis Zeile 243 auf 
Seite 26 ab. Setzen Sie dann 
das Abtippen des Listings 
auf Seite 28 mit Zeile 244 
fort. Das Listing INSTRM- 
TE.LDR bitte bis Zeile 243 
auf Seile 28 abtippen und ab 
Zeile 244 auf Seite 26 foriset- 
zen. 


GEOS-Maus-Erweiterung 

WerdieGEOS-Mausnachge- 
baut hat, wird diese jetzt nicht 
mehr mis.sen wollen. Mit ein 
bißchen Ge.schick lassen .sich 
die beiden Klickta.sten ge¬ 
trennt bedienen. Nachdem 
man die Maus wieder aii.sein- 
andergebaut hat. muß man 
eine Leiterbahn durchtren¬ 
nen. und zwar dort, wo nur 
drei Drähte des Kabels ange- 
.schlossen sind. Leider muß 
man nun ein neues achtadri¬ 
ges Kabel und einen neuen 
Sub-D-Stecker anlöten, weil 
uns bei dem Originalkabel 
ein Draht fehlt. Nun verdrah¬ 
tet man das Interface nach 
dem vorliegenden Schall- 
plan, und fertig i.stdasGanze. 
Wenn alles richtig ist, müssen 
nach dem Betätigen der 
Klicktasten jeweils ein Z und 
einX erscheinen. 

Michael Vogl. Grevenbroich 
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Die Band aus dem 
Computer 

Professionelle Sounds mit dem CPC 

Computer-Musik ist immer mehr im Kommen. Daher ist es nicht 
verwunderlich, daß uns in diesem Monat gleich zwei Musikprogramme 
zum Test Vorlagen. 


Jahrelang war weit und breit kein ge¬ 
eignetes Musikprogramni in Sicht, das 
den Sound-Chip des CPC auch nur 
annähernd ausnutzte. Dann brachte 
UBI-Soft “Equinoxe”, laut Hersleller- 
angabe der “neue musikalische Stan¬ 
dardfürden CPC". 

Nur wenige Tage später erreichte uns 
dann “Musizier mit mir" vom deut¬ 
schen Softwarevertrieb ALL SYSTEM 
SOFTWARE. Originalton des Begleit¬ 
schreibens: “Das neueste und wahr¬ 
scheinlich auch das beste Sound-Pro¬ 
gramm für die Amstrad-CPC-Rech- 
ner". Grund genug für uns, die beiden 
Kandidaten einem ausführlichen Ver¬ 
gleichstestzu unterziehen. 

Der Sound-Chip des CPC ist besser als 
sein Ruf. Wenn der Klang, den Sie bis¬ 
her von Ihrem Computer gewohnt sind, 
mehr einem Scheppern als einer schö¬ 
nen Musik gleicht, ist vielleicht der 
Lautsprecher schuld. Denn an diesem 
Teil wurde beim guten alten CPC doch 
etwas gespart. Bevor Sie sich also von 
der Musik verzaubern lassen, sollten 
Sie Ihren Computer über ein Kabel mit 
der Stereoanlage verbinden. Dann sind 
Sie bestens gerüstet für Experimente 


mit unseren Testkandidaien. Beide Pro¬ 
gramme lösen sich von der bei Musik¬ 
programmen bisher verbreiteten Dar¬ 
stellung der Töne auf Notenlinien. Um 
gute Klangergebnisse zu erzielen, ori¬ 
entieren sie sich stärker am Computer 
und seinen Möglichkeiten als an klassi¬ 
schen musikalischen Regeln. 

Beginnen wir zunächst mit Equinoxe. 
Der Bildschirm ist zweigeteilt. Die un¬ 
tere Hälfte wird von einer Klaviertasta¬ 
tur eingenommen. Im oberen Feld be¬ 
finden sich viele Buchstaben und Zah¬ 
len. Diese entpuppen sich als die pro¬ 
grammierte Tonfolge. Dargestellt wer¬ 
den die Töne nicht auf Nolenlinien, 
sondern durch ihre Buchstabenbe¬ 
zeichnung. Wenn in der ersten Spalte 
also beispielsweise C-3-5 steht, bedeu¬ 
tet dies, daß der Computer auf Kanal 1 
ei n C der Oktave 3 mit der Klangfarbe 5 
spielt. Direkt dai'unter befindet sich der 
nächste Ton. Wird eine Musik abge¬ 
spielt, scrollt diese Anzeige durch. 
Klangfarbe. Rauschen und Oktave 
können für jeden Ton einzeln einge¬ 
stellt werden: der Schlüssel zu interes¬ 
santen Effekten. Auffallend ist. daß we¬ 
der Lautstärke noch Dauer eingestellt 


werden können. Diese können über 
Pausen und Hüllkurven reguliert wer¬ 
den. 

Die Klaviertastatur kommt dann zum 
Zug, wenn im Menü die Option MA¬ 
NUAL gewählt wurde. Das bedeutet, 
daß Sie mit den oberen beiden Taslen- 
reihen spielen können wie auf einem 
Klavier. Auch hier ist es möglich, vor¬ 
her Oktave und Klangfarbe einzustcl- 
len. Diese Funktion eignet sich gut zum 
Komponieren, weil man einfach drauf- 
losspielenkann. 

Equinoxe: Poppige 
Präsentation, ... 

Schön wäre es, wenn diese Klimperei 
vom Computer gespeichert würde, so 
daß diese dann zu editieren und 
nochmals anzuhören wären. Leider ist 
dies nicht möglich. Alles, was für die 
weitere Verwendung im Speicher ver¬ 
bleiben soll, muß von Hand eingegeben 
werden. Auch hier wird wieder das Sy¬ 
stem der Klaviertasten verwendet. Dies 
führt dann zu der etwas merkwürdigen 
Situation, daß man <Tab> für ein C. 
<Q> für ein D und so weiter tippen 
muß. Der Hintergedanke ist hier wohl, 
daß die Tasten nach Tonhöhen geordnet 
sind - links der tiefste, rechts der höch¬ 
ste Ton. Weil die Bezeichnungen der 
Tasten aber nicht mit den Bezeichnun¬ 
gen der Töne übereinstimmen, ist die¬ 
ses System anfangs recht verwirrend. 
Wer Klavier spielt, gewöhnt sich sicher 
schnell ein. Auch andere bekommen 
dies sicher mit etwas Einarbcilungszeit 
in den Griff. Dennoch wäi-e es .schön, 
wenn optional noch andere Möglich¬ 
keiten zur Eingabe der Tonfolge vor¬ 
handen wären. 



Equinoxe: Über Pull-Oown-Meniis sind sänuliclie Funktionen zugänglich 



Equinoxe: Eine Tonfolge wird eingegeben. Sämtliche Klangmerkmale 
können von Ton zu Ton variiert werden 
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Soundtracker: Die grafische Darslelliiiig des HüUkurvenedilors. Obwohl Soundtracker: Das Editieren derArpeggios liefert interessante Klänge 
klein, ist dennoch alles Wichtige auf einen Blick zu erkennen. 


Die kompletten Musikstücke werden 
aus einzelnen Teilen, sogenannten Se¬ 
quenzen, aufgebaut. Diese lassen sich 
beliebig kombinieren und wiederho¬ 
len. Das ist bei längeren Werken eine 
recht sinnvolle Angelegenheit. 

... guter Klang ... 

Zur Fehlersuche werden einige Hilfe¬ 
stellungen geboten. Jede Sequenz kann 
einzeln abgespielt werden. Auch labt 
sich jeder der drei Sound-Kanäle belie¬ 
big ein- und ausblenden. Fummelarbeit 
wartet jedoch dann, wenn man den Feh¬ 
ler gefunden hat. Die Noten lassen sich 
zwar problemlos ersetzen. Wenn je¬ 
doch eine Note ganz entfernt werden 
soll, rückt der Rest nicht automatisch 
nach. Das heißt, alle nachfolgenden 
Töne müs.sen einzeln eine Position wei¬ 
ter nach vorne geschoben werden. Das¬ 
selbe gilt auch für das Einfügen von Tö¬ 
nen. 

... und hoher 
Bedienungskomfort 

Um die Soundfähigkeiten des Compu¬ 
ters auszunützen, ist es wichtig, die 
Klangfarbe der Töne zu verändern. 
Dies geschieht mittels der sogenannten 
Hüllkurven. Eine Frequcnzhüllkurve 
gibt also an. wie sich die Höhe des Tons 
innerhalb desselben verändert. Es ist 
also möglich, daß innerhalb einer Note 
die Tonhöhe leicht ansteigt und dann 
wieder abfällt. Für die Lautstärke gilt 
das gleiche. Durch den richtigen Ein¬ 
satz von Hüllkurven können Instru¬ 
mente imitiert und Vibrato-Effekte er¬ 
zeugt werden. Dies ist der Schlüssel zu 
einem guten Klang. 


Der CPC hat eingebaute Hardware- 
Hüllkurven. Diese werden von Equi- 
noxe leider nicht genutzt. So sind man¬ 
che Effekte, die einen volleren Klang 
liefern würden, leider nicht möglich. 
Eine Qualität, wie sie die Spitzen¬ 
sounds mancher Computerspiele bie¬ 
ten, kann also nicht erreicht werden. 
Sehr gut und benutzerfreundlich ist je¬ 
doch der Programmpunkt, in dem eige¬ 
ne Hüllkurven definiert werden kön¬ 
nen. Die Kurven werden grafisch schön 
dargestcllt und können spielend verän¬ 
dert werden. Wiederholung, Verzöge¬ 
rung - alles kann eingestellt werden. 
Jederzeit können Sie auch aus dem Edi¬ 
tiermenü heraus anhören, wie die Hüll¬ 
kurve gegenwärtig klingt. Diese wer¬ 
den getrennt von der eigentlichen Me¬ 
lodie abgespeichert und können so in 
verschiedenen Musikstücken verwen¬ 
det werden. 

Mitgeliefert werden ebenfalls eine 
ganze Menge vordefinierter Rhyth¬ 
men, mit denen man die eigenen Kom¬ 
positionen unterlegen kann. Wer mit 
diesen nicht zufrieden ist, kann natür¬ 
lich auch eigeneentwerfen. 

Weiterhin ist zu erwähnen, daß Equi- 
noxe erlaubt, die komponierten Werke 
auch in eigene Programme cinzubin- 
den. Diese werden mit einem einfachen 
CALL aufgerufen und laufen dann im 
Interrupt weiter. Wieviel Zeit hierfür 
verbraucht wird, hängt davon ab. in 
welchem Abstand die Töne gespielt 
werden. Ein Aufruf der Sound-Routine 
ist 25-, 50- oder 300mal je Sekunde 
möglich. Jede dreihundertstel Sekunde 
einen Ton abzuspielen ist eine Spezia¬ 
lität von Equinoxe. Dann bleibt nicht 
mehr viel Rechenzeit für andere Aufga¬ 
ben übrig. Zur Untermalung eines 


Spiels ist dies also ungeeignet. Da mit 
dieser Methode jedoch ein be.sonders 
voller Klang erreicht werden kann - 
was aber auch einen großen Aufwand 
beim Erstellen der Stücke erfordert -, 
istdieseFunktion zur Untermalung von 
Bildern oder Menüs dennoch interes¬ 
sant. 

Ein komplettes Stück benötigt norma¬ 
lerweise 12 kByte Speicher. Wenn 
nicht alle Sequenzen belegt werden, 
läßt sich hier aber noch einiges einspa¬ 
ren. 

Soviel zu Equinoxe. Vor zwei Wochen 
hätte dieser Test noch mit den Worten 
geendet: “Trotz einiger Kritikpunkte 
das bisher beste Musikprogramm für 
denCPC”. 

"Musizier mit mir”; Noch 
bedienungsfreundlicher... 

Doch bevor wir ein Fazit ziehen, 
kommt der zweite im Bunde an die Rei¬ 
he. “Musizier mit mir” empfängt den 
Benutzer mit einem seriös aussehenden 
Bildschirm. Dieser schreckt jedoch den 
Benutzer anfangs etwas ab, weil er 
übervoll erscheint. Bei genauerem Hin¬ 
sehen stellt sich aber heraus, daß dieser 
Eindruck nur entsteht, weil sämtliche 
Funktionen der Tasten auf dem Bild¬ 
schirm erläutert werden. Eine Gedächt¬ 
nisstütze, die dem Benutzer erspart, all¬ 
zu oft das Handbuch zu zu Rate zu zie¬ 
hen. Apropos Handbuch: Dies lag uns 
zum Testen leider noch nicht vor. Daß 
die meisten Funktionen anhand der 
Bildschirmanzeige erlernt werden kön¬ 
nen, -Spricht wohl für die Benutzer¬ 
freundlichkeit des Programms. Zwar 
ist die Bedienung nicht ganz so konse¬ 
quent über Menüs möglich, dafür sind 
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die meisten Aktionen aber einfacher, 
intuitiver auszuführen. 

Die Darstellung der Tonfolge und die 
Eingabe der Noten mittels einer Kla¬ 
viertastatur ist mit der von Equinoxe 
nahezu identisch - mit denselben Ein¬ 
schränkungen für alle, die nicht so mit 
dem Klavier vertraut sind. Einen 
großen Vorteil hatjedoch “Musizier mit 
mir”; Man kann, wie im Manual-Mo¬ 
dus bei Equinoxe, frei spielen. Doch 
speichert hier der Computer die ge¬ 
spielten Töne zur weiteren Verarbei¬ 
tung; eine enorme Arbeitserleichte¬ 
rung. Auch das Einfügen vergessener 
oder das Entfernen überflüssiger Töne 
ist hier, im Gegensatz zum Konkur¬ 
renzprodukt, möglich. 

... und noch besserer 
Klang 

Also wird man meist zuerst eine Melo¬ 
die frei spielen, dann im Editiermodus 
Fehler nachbessern, vielleicht auch den 
Klang einzelner Töne verändern. 

Im Hinblick auf das Definieren eigener 
Hüllkurven sind beide Programme im 
wesentlichen identisch. “Musizier mit 


mir” unterstützt Jedoch zusätzlich die 
Hardware-Hüllkurven desCPC. 

Eine Spezialität des Programms sind 
die Arpeggios. Diese simulieren Ak¬ 
korde. Das Besondere: Für einen Ak¬ 
kord wird nur ein einziger Sound-Ka¬ 
nal benötigt. Dies geschieht durch 
schnelles Abspielen verschiedener Tö¬ 
ne auf dem gleichen Kanal nacheinan¬ 
der, die sich jedoch beim Hören überla¬ 
gern. 

Nahezu alle Funktionen von Equinoxe 
finden sich hier genauso gut, oft sogar 
besser. Die Musikstücke laufen auch 
ohne das Programm, es wird nur so viel 
gespeichert, wie unbedingt nötig ist. In¬ 
strumente können unabhängig von der 
Melodie gespeichert werden. Einzelne 
Elemente können beliebig kombiniert 
und - hier sogar in verschiedenen Mo¬ 
dulationen - wiederholt werden. Die 
Stimmen lassen sich einzeln ein- und 
ausschalten. 

Nurzwei Dinge fehlen: die mitgeliefer¬ 
ten Rhythmen und die Möglichkeit, 
300 Töne pro Sekunde abspielen zu las¬ 
sen. 

Dies wird jedoch mehr als ausgegli¬ 
chen durch die bessere Editierbarkeit, 


durch Hardware-Hüllkurven und die 
Arpeggios. 

Mit “Musizier mit mir” i.st es leichter, 
einen Song zu schreiben, vor allem, 
weil die Melodie sozusagen live einge¬ 
spielt werden kann. Und mit etwas Ta¬ 
lent la.ssen sich Ergebnis,se erzielen, die 
sich hinter den Spitzensounds aus 
Computerspielen und Demos nicht zu 
verstecken brauchen. 

Auch Service scheint bei ALL SY¬ 
STEM SOFTWARE großgeschrieben 
zu werden. Das Programm ist nicht ko¬ 
piergeschützt, aber mit einer Serien¬ 
nummer versehen. Wer als Benutzer re¬ 
gistriert ist, kann auf eine Bibliothek 
von neuen Instrumenten und den Up¬ 
date-Service zurückgreifen. 

Equinoxe ist ein recht gutes Programm. 
Doch im direkten Vergleich schneidet 
“Musizier mit mir” noch um Längen 
besser ab. Wer auf eine bunte Darstel¬ 
lung verzichten kann, findet hier ein 
Programm, das beinahe jede Funktion 
bietet, die sich der Benutzer wünscht. 

Andreas Lober/rs 


F 
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I Spielespaß CPC und Joyce zu Spitzenpreisen i 



Splelesammlungen CPC 3” 

Hollywood Colletiion: Robcop ■ Ghosl- 
busters II > Batman > Indiana Jones .. 89,95 
Vinual Worlds: Oriller < Total Edipse • 

Casäemaster • The Crypl.79,95 

Movie Premiere: Turtles • Back to the 

Futurs II * Gremlins 2* Indiana J.69,95 

System Pack: 

Vendetta • Tusker • MYTH • IK+.89,95 

Grandstend: Gazza 's Soccer • Tennis 

Tour • Continental Circus • Golf.89,95 

TTJT2: 5 Actionspiele.89,95 

Rats of Fury: 4 Karatespiele.89,95 

Capcom Collection: 8 Kampfsp. ..119,95 
Rodeo Games: 6 Spiele.69,95 

3" Spiele zu Superpreisen 

Wählen Sie 4 der 11 nachfolgenden Spiele 
aus und zahlen Sie zusammen nur noch 
DM 100,- oder einzeln je DM 30,- 


Q Tlme-Scanner (Flipper).30,- 

n Worldcup Soccer Italy 90 . 30,- 

□ MontyP]^hon's Rytng Circus.30,- 

Q Dominator (Action).30,- 

Q Hammerfist (Karate).30,- 

Q Sorcery + (Actbn).30,- 

G Super Games I: R. in den Höhlen < R. in 
der Zeit • Hunchback • Astro Attak.... 30,- 
G Super Games II: R. am Seil * R. im All 

• Punchy • Harner Attack.30,- 

G Super Games III: Ripper • Knifferl • 

Reversi.30,- 

G They Sold a Million II: 

Bnjoe Lee • Match Day • Match Pdnt • 
Knightiore.30,- 

3” CPC Knüller 

G Prince of Persia (Action).54,95 

G Slm City (Strategie).69,95 

G North and South (Strategie).59,95 

G Gunship (Kampfspiel).69,95 

G F-16 Combat Pilot e. Hancb.39,95 

G Samurai Trilogy (Kampfspiel).59,95 

G Ninja Werriora (Kampfspiel).39,95 

G Out Run Europa (Autorennen).59,95 

G Lemmings (Strategie).69,95 

CH PIrales (Strategie, min. 128 KB).69,95 

G Terminator 2 (Acöon).49,95 

G The Jetsons (jump and run).49,95 

G Potsworth (jump and run).49,95 

G Hero'sQue8t(Rollenspid).49,95 

G .... Zusatzdisk (Return witchlord) ...39,95 




m 


Joyce SpIelB rnttfiallachw Anleitung 

G Match Day II (Fußball).69,- 

G Tontahawk (Hubschraubersim.).79,- 

G Grand Slam (Tennis).79,95 

G Classic Collection: 

D Ballerspiel • Climb It ♦ Skiing.79,95 

Q Terracom (Breakout Spiel).79,95 

O Tetrls (Geschicklichkeit).79,95 

0 Tank Attack (Panzerkrieg).79,95 

G Head Coach (Football).79,95 

□ Catch 23 (Kriegsspiel).79,95 

G Steve Davis SnocAer (Billiard}.79,95 

B Complele Entertalnement:.„..79,95 

Joyce Joystick Controller.69,- 

G Adapter zu Joystick Controller .....39,- 

G Joystick: Quickshot 11+.19,80 

G Joystick: Competitlon Pro 5000 ....39,80 


G Ja , ich bestelle die angekreuzten Spiele 
Wenn mal ein Spiel nicht da sein sdlte, möchte 
ich folgenden Ersatz; 

D_ ..._ 


2 ) 


Name, Vorname 


Straße 

RlZ,Örf 






COnPUTER-ELEl^TROrHK D-7150 Badouin^ 

Versancitosten Inland: DM 7,80 / bis 5kg (Scheck oder NN,) 
Ausland: DM19,60 (nur Vorauskasse) 

Tel: 07191-1528(29), 60076 
Fe» 0719V60077 
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Kampf und Knobelei 

Sport, Spiel und Spannung 
auf dem CPC 

Sommerzeit, Urlaubszeit - Erholungistgefragt.Wirgebcm Ihnen Unterstüt¬ 
zung bei der Auswahl der Spiele für Ihre Entspannung und Erholung. Mit 
Spielen auf dem C PC über brücken Sie mühelos das von vielen gefürchtete 
Sommerloch. 


Die P47 THUNDERBOLT war eines 
der erfolgreichsten amerikanischen 
Flugzeuge des Zweiten Weltkriegs und 
steht jetzt Pate für eine Autoniatcnum- 
setzung. 

Die Aufgabe des Spielers ist es, das 
Flugzeug durch eine von rechts nach 
links scrollende Landschaft zu steuern 
und sich Angreifer vom Leib zu halten. 
Nach dem Abschießen von Feinden er¬ 
scheinen ab und zu Symbole auf dem 
Bildschirm. Wenn diese aufgesammell 
werden, kann man Zusatzwaffen erhal¬ 
ten. Darunter befinden sich Bomben, 
verschiedene Raketenarten und Tur- 
bos, die das Flugzeug manövrierfähi¬ 
germachen. 

Die Luftschlacht tobt 

Schon die großzügig gestaltete, mit 
Farbfotos des Flugzeugs unterlegte An¬ 
leitung macht zwei Dinge deutlich. Er¬ 
stens: Das Spiel ist ungeeignet für alle, 
die eine Abneigung gegen Kricgsspiele 
haben oder die etwas für ihre kleinen 


grauen Zellen suchen. Zweitens: Die 
Herstellerfirma hat sich alle Mühe ge¬ 
geben, alle anderen zufriedenzustellen. 
So sind Sprites und Hintergrundgrafi¬ 
ken sauber, schön bunt und teilweise 
auch gro(5. Zum Glück macht auch das 
Scrolling nicht negativ auf sich auf¬ 
merksam. Es ist so flüssig wie der ge- 
.samte Spielabiauf. Das Spiel beeinhal- 
tei Bodenangriffe. Luft- und See¬ 
schlachten, was sich auch durch ver¬ 
schiedene Gegner äußert. 

Action, die süchtig 
macht 

Zwi.schen den einzelnen Levels wird der 
Spieler mit einem Bild erfreut, das den 
ganzen Bildschinn einnimmt und aufdie 
folgende Mission einstimmt. Während 
des Spiels gibt es knackige Sound-Effek¬ 
te, vorher eine Titelmelodie. 

P47 hat einen ausgesprochen starken 
Nur-noch-ein-einziger-Versuch-Ef¬ 
fekt. Plötzlich stellt man fest, daß schon 
wieder eine Stunde vergangen ist. 


P47 THUNDERBOLT 

Hersteller: Hrcbird 
Steuerung: Joystick oderTastatur 
Vurausscl/ung: füralleCPCs 
Preis: 84,50 DM 

Zur Verfügung ae.stcllt von: EDV-Obermeier 
Anleitung: englisch 
Bemerkung: lädt nach 

Bewertung: 

Grafik; 1 Pr.isenlalion; I 

Sound: 2 Motivation: I 

Endnote: 1 


Schweren Schrittes schreitet HAM¬ 
MERFIST durch den von einer Neon¬ 
röhre erleuchteten Raum. Mit einem 
gezielten Scliuß hält er sich einen an¬ 
greifenden Androiden vom Leib. Doch 
dann stößt er an seine Grenzen. Mit sei¬ 
nem schweren Körperbau ist es ihm un¬ 
möglich, die höher gelegene Plattform 
zu erreichen und den dort stehenden 
Computer zu vernichten. Ein kurzes 
Flackern, gerade einen Sekunden¬ 
bruchteil lang. Da, wo eben noch Ham¬ 
merfist stand, befindet sich Jetzt Meta- 
lises. Mit einem geschmeidigen Flick¬ 
flack erreicht sie die höher gelegene 
Ebene. 

Nun kann sie den Computer zerschla¬ 
gen und so dem ausgeklügelten Sicher¬ 
heitssystem des Contro-Holografix- 
Meisters eine empfindliche Wunde zu¬ 
fügen. Dieser verwandelt nämlich 
Menschen - darunter auch die beiden 
Helden des Spiels - mit einer besonde¬ 
ren Begabung in Hologramme. Diese 
werden dann so umprogrammiert, daß 
sie schreckliche Taten im Dienste ihres 
Herrn ausführen. Allerdings ist bei 
Hammerfist und Metalises eine 
Störung aufgetreien, und die beiden 
stürmen jetzt auf ihren Herrscher zu, 
um ihn zu vernichten. 

Verhängnis für den 
finsteren Meister 

Dabei haben sie es mit einer teuflischen 
Anordnung aus kämpfenden Men¬ 
schen. Maschinen und sogar PHanzen 
zu tun. Diese hinterlassen, einmal be¬ 
seitigt, oft Symbole, die neue Kraft und 
Waffen bringen. 

Eine Chance, das Böse zu besiegen, 
gibt es nur, wenn sich die bewegliche 
Metalises und der bärenstarke /7aw- 
mer/i'.yf ergänzen. 

Außer ihren körperlichen Fähigkeiten 
brauchen sie auch Köpfchen, um die Si¬ 
cherheitsmechanismen auszutricksen. 
Wie die einzelnen Elemente des Sicher¬ 
heitstrakts miteinander verbunden 
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sind, ist meist nicht gerade olTcnslcht- 
lich. 

Sound ist keiner vorhanden. Ob dies so 
ist, weil die Mission leise verlaufen soll 
oder weil die Programmierer keinen 
Speicher oder keine Lust hatten, sei da¬ 
hingestellt. Während alles sehr schön 
detailliert und animiert ist, muß man 
sich leider mit einer Schwarzweißdar- 
slellung des Spielgeschehens begnü¬ 
gen. 

Zwei Heiden müssen 
sich ergänzen 

Um nun zu einer Beurteilung zu kom¬ 
men. sei angemerkt, daß das Spiel ruhig 
etwas schneller hätte ausfallen können. 
Trotzdem i.st HAMMERFIST ein ge¬ 
lungenes, nicht ganz einfaches Pro¬ 
gramm. das seinen Reiz nicht zuletzt 
durch die beiden unterschiedlichen 
Charaktere erhält. 


HAMMERFIST 

Hersteller: Vivid Image 
Steuerung: Joystick oderTastalur 
Voraussetzung: TüralleCPCs 
l>reis: 74,50 DM 

Zur Verfügung gestellt von: EDV-Obermeier 
Anleitung: deut-sch. englisch, französisch, ita¬ 
lienisch 

Bewertung: 

Grafik;2 Präsentatic>n:2 

Sound:- Molivatioii:2 

Endnoie:2 


Prügelspiele sind mal wieder in Mode. 
FINAL FIGHT heißt der Beitrag von 
US Gold zu diesem Thema. Beinahe 
obligatorisch schon, daßes sich hierum 
eine Aulomatenumsetzung handelt. 

Wie üblich, wennes um Straßenkämpfe 


geht, ist der Auslöser ein entführtes 
Mädchen. Diesmal ist es die Tochter 
des Bürgermeistens, der zu entschlos¬ 
sen gegen das organisierte Verbrechen 
vorging. Die ganze Vorgeschichte 
wird, von Bildern und einer Titelmusik 
untermalt, auf dem Bildschirm als Vor¬ 
spann erzählt. 

Da fliegen die Fetzen 

Nun greift das Stadloberhaupt selbst 
ein, krempelt die Ärmel hoch und zeigt 
den Gunoven, wer in der Stadt das Sa¬ 
gen hat. Wenn gewünscht, können Sie 
statt Haggar, dem Bürgermeister, auch 
den Freund des Mädchens oder einen 
Gelegenheilsschläger steuern. 

Jeder dieser drei liat unterschiedliche 
Kampftechniken. Besonders wir¬ 
kungsvoll ist es, wenn Haggar einen 
Angreifer packt. Nun kann er hoch¬ 
springen, den anderen kopfüber hallen 
und auf den Boden schmettern. Das hält 
nicht einmal der dickste Betonschüdel 
lange aus. Die schwachen Töne, die da¬ 
bei aus dem Lautsprecher dringen, ste¬ 
hen allerdings in keinem Verhältnis zu 
den gesundheitlichen Schäden, die die¬ 
se Vorgehens weise verursachen dürfte. 
Wem dies zu wenig effektiv ist, der 
kann sich noch mit Messern. Rohren 
und sonstigen herumliegenden Dingen 
bewaffnen. Und wenn die Kräfte nach- 
lassen, hilft ein kleiner Snack, den man 
aus so manchem Mülleimer ergattern 
kann. 

Brutalität siegt 

Die normalen Angreifer und die eige¬ 
nen Spielfiguren sind groß. Aber 
gegenüber einigen der Bandenchefs se¬ 
hen sie aus wie kleine Würstchen. So 


große Sprites mit menschlicherGestalt, 
überdies noch witzig, gab es zuvor 
kaum einmal. Dasselbe gilt auch für die 
vorbeiscrollenden flintergnindbilder. 
Erwähnt werden sollte aber auch, daß 
die Bewegungsabläufe teilweise aus zu 
wenigen Phasen bestehen. 

Durch die großzügige Ausstattung mit 
Leben und Credits ist die Aufgabe, zu¬ 
mindest als Haggar, nicht unlösbar. So 
einfach, daß sie nicht doch ein ordentli¬ 
ches Maß an Übung erfordern würde, 
ist sie aberzuniGlück doch nicht. 

Zu kritisieren ist die Verpackung: Nir¬ 
gends ist erwähnt, daß das Spiel 128 
kByie benötigt. Statt de.ssen wird mit 
einem Zwei-Spieler-Modus geworben, 
dernicht existiert. 


FINAL FIGHT 

Hersteller: UvSGold 
Steuerung: Joystick oderTastalur 
Voraussetzung: 128 kByie 
Preis: 84,5()DM 

Zur Verfügung gestellt von: EDV-01>ernieier 
Anleitung; deutsch, englisch, französisch, ita- 
lienisch 

Bemerkung: lädt nach. Spccirum-Version be¬ 
findet sich auf der gleichen Diskelle 

Bewertung: 

GraEk: I Prä.senlalion:2 

Sound: 3 Motivation: 2 

Kndnoie:2 


Manchmal hat man den Eindruck, daß 
alle neu erschienenen Action-Spiele 
aus England entweder Autoniaienum- 
setzLingen, Nachfolger von bereits be¬ 
kannten Spielen oder Spiele zu einem 
Film sind. Nicht so EXTREME, das 
ganz ohne großen Namen auskomml. 
Die Story liest sich wie ein kleiner 
Science-fiction-Roman. Im Jahre 1973 
wurde die Raumsonde Pioneer 10 ge- 
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Starlet; an Bord eine Tafel mit Informa¬ 
tionen über die Erde, die, als die Sonde 
unser Sonnensystem verließ, auf Nim¬ 
merwiedersehen verschwand. 

Der lang erwartete 
Besuch wurde überfallen 

Bis zum Jahre 3021. Denn da krachte 
ein Raumschiff auf die Erde, erbaut von 
einer außerirdischen Lebensform, die 
die Tafel gefunden hatte und die 
Menschheit besuchen wollte. Doch un¬ 
terwegs wurde das Schiff von Raumpi¬ 
raten überfallen, die den Sclbslzer- 
störungsmechanisinus in Gang setzten. 
Ihre Aufgabe ist es. diesen Mechanis¬ 
mus auszuschalten, da durch eine Ex¬ 
plosion des Raumschiffs die ganze Er¬ 
debedrohtwäre. 

Sie sehen das ganze Geschehen, mit 
großen bunten Sprites auf den Bild¬ 
schirm gebracht, von der Seite. Die ei¬ 
gene Raumkapsel sinkt ständig ab, 
wenn Sie keinen Schub geben. Der 
Bild.schirm scrolll in alle Richtungen. 
Daß Sie schießen und Extras aufsam¬ 
meln können, werden Sie schnell be¬ 
merken. 

Schwer, aber sehr gut 

Der Schwerpunkt dieses extrem 
schnellen, nicht gerade leichten Spiels 
liegt in allen drei Levels eindeutig auf 
Action. Doch die allein hilft nicht wei¬ 
ter. Schier undurchdringliche Sperren 
müssen passiert und eine Sphärenkugel 
muß geborgen werden. Leider hat man 
für die ganze Sache nur ein Leben und 
ein Zeitlimil, wodurch das Spiel 
manchmal frustrierend ist. 

Ansonsten sorgen die gute Grafik und 


der abwechslungsreiche Spielverlauf 
für viel Spaß. 


EXTREME 

Hersteller: Digital Integration 
Steuerung: Joystick oderTastalur 
Vnrausset/utig: füralle CPCs 
Preis: 79,50 DM 

Zur Verfügung gestellt von: liDV-Obenncicr 
Anleiliing: deutsch, englisch, fran/osisch. ila- 
lieni-sch 

Bewertung: 

Grafik;! Präsentation: 2 

Sound: 3 Motivation: 2 

Endnoie: 2 


Das erste, was einem nach dem Laden 
von MANCHESTER UNITED EU- 
ROPE auffällt, ist die Fülle an Optio¬ 
nen. Schön mit Icons dargestellt, lassen 
sich Trainemamen, Aufstellung der 
Mannschaften und noch vieles mehr 
verändern. Gleich zu Beginn kann die 
Sprache der Bildschirmanzeigen aus¬ 
gewählt werden. Auch Deutsch ist ein¬ 
stellbar. allerdings sind nicht alle Texte 
übersetzt. 

... läuft auf das Tor zu, 
schießt... 

Freundschaftsspiele und die großen eu¬ 
ropäischen Wettbewerbe können ge¬ 
spielt werden. 

Im eigentlichen Spiel wird das Feld von 
oben gezeigt. Die Figuren sind klein, 
man kann aber alles erkennen - sogar 
den herumlaufenden Schiedsrichter, 
der Fouls bestraft und gegebenenfalls 
auch Rote Karten verteilt. 

Sie können jeweils den Spieler steuern, 
der sich am nächsten am Ball befindet. 
Ecke, Einwurf, Freistoß, Elfmeter: Al¬ 


les ist vorhanden. Sogar die Spieler 
können ausgewechselt werden. Die 
Steuerung ist schnell erlernt, so daß 
auch die ersten Spiele gegen den Com¬ 
puter kein Problem darstellen. Dies 
wird aber auf Dauer auch zu einem 
Schwachpunkt des Programms: Der 
Computergegner stellt keine allzu 
große Herausforderung dar. 

... und Toooorü! 

MANCHESTER UNITED EUROPE 
braucht sicher keinen Abstieg in die 
zweite Liga zu fürchten. Aber ob’s zur 
Meisterschaft reicht? 


MANCHESTER 
UNITED EUROPE 

Hersteller: Krisiilis Software 
Steuerung: Joystick oderTastauir 
Voraussetzung: füralle CPCs 
Preis: 67.40DM 

Zur Verfügung gestellt von:EDV-Obermcier 
Anleitung: englisch 

Bewertung: 

Orank:3 Präsentation: I 

Sound:5 Motivation:2 

Endnolc;2 


Nun bietet sich ein Vergleich mit dem 
zweiten Fußballspiel in diesem Heft. 
KICKOFF2,an. 

Zuerst sieht es für dieses recht düster 
aus: Die grafische Darstellung des 
Spielfelds und der Spieler ist, bei glei¬ 
cher Perspektive, wesentlich schlech¬ 
ter. Wo MANCHESTER UNITED mit 
Icons aufwartet, wird nur Text geboten. 
Das Spielfeld ist riesig groß, so daß nur 
ein kleiner Ausschnitt auf dem Feld ge¬ 
zeigt wird und man nicht so genau ein¬ 
schätzen kann, wie weit oben man sich 



FINAL FIGHT - Die Straßenkämpfe in amerikanischen Großstädten 
sind blutig 



EXTREME - Entschärfen Sie den Selhslzerstörungsmechanisnnts des 
Raumschiffes 
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MANCHESTER UNITED EUROPE - Zahlreiche Optionen und die größ¬ 
ten europäischen FußhaUteams 


KICK OFF 2 - Wer wird Meister? 


gerade befindet. Wie weil links oder 
rechts vom Tor entfei nt Sie sich befin¬ 
den. wird aber ständig angezeigt. 

Manchester United geht 
in Führung 

Ungewöhnlich auch, daß Sie nicht im¬ 
mer den Spieler unter Kontrolle haben, 
der am dichtesten am Ball ist. Dies wird 
nur nach einigen Sekunden gewechselt, 
was Vor- und Nachteile mit sich bringt. 
Selbst auf der schwächsten Stufe hat 
man bei diesem ausgesprochen schnel¬ 
len Spiel anfangs gegen den Computer 
kaum eine Chance. Die.ser spielt zwar 
wie ein Anfänger und verfehlt auch lau¬ 
fend das Tor. Doch man lut sich mit den 
verschiedenen Möglichkeiten, den Ball 
zu stoppen, zu passen und zu dribbeln, 
recht schwer. Nach einer Eingewöh¬ 
nungsphase stellt man jedoch fest, daß 
dadurch unglaublich viele spielerische 
Feinheiten ermögl icht werden. 

Doch Kick Off 2 liefert 
eine tolle Aufholjagd 

Außer Ab.seits gibt es praktisch alle Re¬ 
geln des echten Fußballs. Die bei 
MANCHESTER UNITED aufgezähl¬ 
ten sind alle vorhanden, auch Liga. Tur¬ 
niere und Aufstellung. Die Spielstarke 
kann für beide Mannschaften getrennt 
eingestellt werden, sogar eine Wieder¬ 
holung einzelner Spielzüge in Zeitlupe 
ist möglich. Diese kann auch gespei¬ 
chert werden. Auf Wunsch kann sogar 
die Auswirkung von Wind eingestellt 
werden. 

Welches der beiden Programme ist nun 
besser? Letztlich ist dies wohl Ge¬ 
schmackssache. MANCHESTER 


UNITED ist viel einfacher zu erlernen, 
dafür hat man bei KICK OFF 2 spiele¬ 
risch mehr Möglichkeiten. 


KICK OFF 2 

Hersteller: Anco 
Steuerung: Joystick odcrTasialur 
Voraussetzung: l28kByte 
Preis: 64.50DM 

Zur Veriügunggestellt von; EDV-Obenneier 
Bewertung: 

Gr:irik:5 Präscntation:4 

Sound: 5 Motivation:! 

Endnolc:2 


Gleich zwei Handelssimulationen legt 
uns das Schubert-Team aus Rüssels¬ 
heim vor. Beide Spiele haben vom 
Grundprinzip her viele Ähnlichkeiten, 
abcrdoch auch ihre Eigenarten. 

Zwei Handelsspiele auf 
einen Schlag 

Bei SPRITFABRIKÄNTEN geht es 
um den alten Traum, sich vom Teller¬ 
wäscher zum Millionär hochzuarbei- 
len. Mehrere Spieler können sich daran 
beteiligen, mit einem geringen Startka¬ 
pital eine Spiriluosenfabrik aufzubau¬ 
en. Es gilt, Rohstoffe und Maschinen 
einzukaufen, fertige Waren im Heimat¬ 
ort, anderswo in Deutschland oder in 
der Well zu verkaufen. Bei größeren 
Entfernungen, die auch höhere Gewin¬ 
ne versprechen, sind dazu allerdings 
Lkw oder Schiffe erforderlich. Aber 
man sollte auch darauf achten, daß 
genügend Arbeiter vorhanden sind. 
Auch können Sie versuchen, an der 
Börse Ihr Glück zu machen. Bei mehre¬ 
ren Mitspielern kann man Detektive 


auf die anderen hetzen, was den Reiz 
beträchtlicherhöhl. 

Beide Spiele komplett 
in Deutsch ... 

Die BAUERN IN HESSEN hatten es 
schwer, wenn sie sich bis zum Kaiser 
hocharbeiten wollten. 

Bei diesem Computerspiel überneh¬ 
men Sie die Rolle eines solchen Bau¬ 
ern, der hoch hinaus will. Alleine oder 
im Wettstreit mit Freunden gilt es, 
durch An- und Verkauf von Land. An¬ 
bau von Früchten und Akticnspekula- 
lionen den eigenen Wohlstand zu ver¬ 
größern. Dadurch steigt natürlich auch 
das Prestige des Spielers. 

... aber leider nur von 
durchschnittlicher Qualität 

Die Anleitung beschreibt genau alle 
Eingenschaften des Programms. Diese 
sind im wesentlichen mit bekannten 
Programmen gleicher Art, beispiels¬ 
weise KAISER, identisch. Zwar gibt es 
ziemlich viele Menüs und Faktoren, 
doch diese setzen spielerisch kaum Ak¬ 
zente. Aktionen, die andere Mitspieler 
betreffen, sind in der derzeitigen Versi¬ 
on nicht möglich. 

Für beide Programme gilt: Die Dar¬ 
stellung ist übersichtlich, die Me¬ 
nüführung über Anklicken der Optio¬ 
nen gut gelöst. Es wird aber unnötig 
viel nachgeladen, und es wäre ange¬ 
nehm. wenn man die Eingabe der Zah¬ 
len auch Uber die Zahlentaslen und 
nicht nur mit dem Pfeil vornehmen 
könnte. Dies ist aber nicht allzu 
störend. 

Positiv hervorzuheben ist auch der Up- 
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BATTLE COMMAND - Zehn strategische Missionen müssen ühersia/h 
den werden 









BAUERN IN HESSEN - Ühernehmen Sie die.RoHe eines hessischen 
Haltern 


date-Service. durch den man für 10,- 
DM die neueste Version des Pro¬ 
gramms bekommen kann. 


SPRITFABRIKANTEN 

Hersteller: Schubert-Team 
Steuerung: Tastatur 
Voraussetzung: filrallcCPCs 
Preis:49,yüDM 

Zur Verfügung gestellt von: MB-Versand 
Anleitung: deutsch 

Bemerkung: nuraurUiskcttccdialtlich 
Bewertung: 

Grafik: 4 Präsentation: 4 

Sound:- .Motivation:.^ 

Endnote 3 


BAUERN IN HESSEN 

Hersteller: Schube ri-Teani 
Steuerung: Tastatur 
Voraussetzung: fUralleCPCs 
Preis:49.90DM 

Zur Verfügung gestellt von: Schubert-Team 
Anleitung: deutsch 

Bemerkung: nurauf Diskette erhältlich 
Bewertung: 

Grafik: 5 Sound:- 

Präsentation:.3 Motivaiion:4 

Rndnolc: 4 


Die Rüstungsindustrie darf sich freuen: 
Kriege wird es auch in Zukunft geben. 
Wohl wegen Ende des Kalten Krieges 
ist jedoch der Orl, an dem BATTLE 
COMMAND spielt, so die Anleitung, 
“fern und unbekannt”. 

Der Norden und der Süden stehen sich 
in zermürbenden Kämpfen an verhärte¬ 
ten Fronten gegenüber. Entscheidend 
sind Eliteeinheiten, die dicht hinter der 
Fronllinie im Einsatz sind. Inzwischen 
ist sicher auch klar geworden, wer mit 
der Ausführung der kompliziertesten 


Missionen betraut wurde: natürlich der 
Spieler. 

Strategie und Aclion wurden geschickt 
miteinander verquickt und in ausge- 
füliter Vektorgrafik auf den Bildschirm 
gebracht. Zehn verschiedene Missio¬ 
nen stehen zur Auswahl. Die letzte 
kann jedoch erst dann in Angriff ge¬ 
nommen werden, wenn zuvor alle an¬ 
deren erfolgreich beendet wurden. Der 
SpieKstand kann zwischen den einzel¬ 
nen Missionen gespeichert werden. 

Schnelle, ausgefüllte 
Vektorgrafik 

Im Kampf gegen den zahlenmäliig 
überlegenen Feind steht Ihnen ein Pan¬ 
zer zur Verfügung, der mit verschiede¬ 
nen Waffensystemen au.sgesiattet wer¬ 
den kann. Die maximale Zuladung 
macht eine sehr sorgfältige Waffenaus¬ 
wahl erforderlich. 

Zahlreiche Tasten werden benötigt, um 
alle Funktionen — vom Fernglas bis 
zum Nachtsichtgerät - aktivieren zu 
können. Daher ist die beigefügte Karte 
miteiner Tastenübersicht mehrals will¬ 
kommen. Trotzdem gibt es an der Aus- 
.stattung einiges auszu.setzen. Die An¬ 
gabe von 16 verschiedenen Missionen 
auf der Packung ist Hochstapelei. Daß 
das Programm 128 kByte Speicher¬ 
platz benötigt, wird verschwiegen. Und 
das ausführliche Handbuch, auf das in 
der Kurzanleilung verwiesen wird, lag 
unserem Testmuster auch nicht bei. 

Taktisch vergehen und 
schnell reagieren 

Obwohl die Grafik ausgefüllt ist, läuft 
das Spiel .sehr schnell ab. Daß der De- 


lailreichlum der Landschaft darunter 
leidet, ist klar. Doch wurde hier ein sehr 
guter Komprom i ß gefunden. 
Simulation. Strategie und Aclion zu 
verknüpfen ist nicht ganz einfach. Bei 
BATTLE COMMAND ist dieses Un¬ 
terfangen recht gut geglückt. Es besteht 
dennoch die Gefahr, daß sich einge¬ 
fleischte Simulations- oder Strategie- 
spielfans auf Dauer etwas mehr Tief¬ 
gang wünschen würden. Oder daß Ac- 
tion-Spicler lieber “einfach so” drauf- 
losballern würden. Wer aber nicht so 
sehr auf eine bestimmte Sparte festge¬ 
iegt ist, wird an BATTLE COMMAND 
seine Freunde haben. 


BATTLE COMMAND 

Hersteller: Occan 

Steuerung: TastaluroderJoystick und Tastatur 
Voraussetzung: 12SkByie 
Prcis:74,50DM 

Zur Verfügung ge.stelll von: F.D V-Oberineicr 
Anleitung: deutsch, englisch, franzö-si.sch, ita¬ 
lienisch 

Bemerkung: lädt nach 
Bevtertung; 

Grafik; 3 Präsentation; 4 

Sound:4 Molivation:2 

Endnolc:2 


Andreas Lober/jg 


Die Mu.slersleilien uns zur Verfügung: 

EDV-Obermcier 

Blinder Slraßc 20 

W-4972 Löhne 1 

MB-Versand Köln 
Po.stfach.‘>()ll32 
5000 Köln 50 
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DATABOX 


DATABOX 

ist der preiswerte Software-Service Ihrer Zeitschrift 

DATABOX 

enthält lauffähige Programme für ihren Einsatz 

DATABOX 

iohnt sich auf jeden Fali - Monat für Monat 


PCW 8256/8512/9512 


Nimm Dir Einen 

Kennen Sie noch das Nimm-Spiel, wo so lan¬ 
ge Streichhölzer gezogen werden, bis keines 
mehr da ist? Versuchen Sie doch, den Compu¬ 
ter zu überlisten. 

Aus Text mach COM 

Wie wäre es, anstelle von TYPE LIESMICH 
nur noch LIESMICH eingeben zu müssen? 

Wir bieten eine Möglichkeit, Textdateien so mit 
einem Programm zu verbinden, daß sie direkt 
aufrufbar sind. 


Lasset Blumen blühen 

Die Vererbung von bestimmten Eigenschaften 
geht bei allen Lebewesen nach einem be¬ 
stimmten Schema vor. Dieses gilt es dann 
auch bei unserem Spiel rund um die Blume zu 
beachten. 

LocoDir in BAS und PAS 

Programme lassen sich in vielen Programmier¬ 
sprachen verfassen. Wir haben uns die Auf¬ 
gabe gestellt, ein Programm jeweils in Pascal 
und auch in Basic zu schreiben. Das Resultat 
kann sich sehen lassen: ein Datei-Infoleser 
der Spitzenklasse. 


Einzelbezugspreis für DATABOX: 
PCW - 3-Zoll-Diskette 


24,- DM 

Wenn Sie über den DMV-Verlag bestellen, gilt folgendes: 


1 Inland: 

Ausland: 


1 Einzelpreis 24.- DM 

Einzelpreis 

24,- DM 

zzgl. Versandkosten 4,- DM 

zzgl. Versandkosten 

6,- DM 

Endpreis 28,- DU 

Endpreis 

30.- DM 


Zahlungshlnwels«: 

Am einfachsten per Vorkasse (Verrechnungsscheck) oder als Nachnahme zuzüglich der Nach 
nahmegebühr. (Bei Lieferungen ins Ausland isi Nachnahme nicht möglich.) 


Bitte benutzen Sie die Bestellkarte. 

DMV-Verlag • Postfach 250 ■ 3440 Eschwege 




Daten-und 
Hedianvertal 
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Frisch und unverbraucht 

Neueste Spiele für den CRC 

Tun Sie etwas für den Umweltschutz, oder suchen Sie Leonardos Kunstwerke. 
Das erstere sollte wohl keinerlei Schwierigkeiten bereiten. Leonardos Kunst¬ 
werke sind aber sicherlich bereits alle gefunden. Nicht so bei den Spielen unse¬ 
rer neuesten Review. Die Phantasie weit der Spiele hält noch so manche Über¬ 
raschung für Sie bereit, und es gibt sicherlich noch Unmengen an Geheimnis¬ 
sen, die auf Sie und Ihre Lösung warten. 


Nachdem nun fast sämlliche Aufgaben¬ 
stellungen in Computerspielen verbra¬ 
ten wurden, geht es bei CAPTAIN 
PLANET AND THE PLANETEERS 
erstmals um den Umweltschutz. Ganz 
ohne Bösewichter kommt man aber nun 
doch nicht aus. Sly Sludge, Laoten Plun¬ 
der und Doctor Blight verfolgen selbst¬ 
süchtige Pläne und zerstören dabei unse¬ 
ren Planeten. Diese Story ist übrigens 
aus einer englischen Fernsehshow über¬ 
nommen. Entsprechend enthält die An¬ 
leitung zwar keine Angaben zum Spiel¬ 
ablauf. dafür Umweltschutztips. 

Ein “grünes” Spiel 

Spätestens nach dem Starten des Spiels 
merkt man von dem Thema des Spiels 
nichts mehr. Es geht originellerweise 
darum, in einer von rechts nach links 
scrollenden Landschaft so lange am 
Leben zu bleiben, bis man am rechten 
Ende angekommen ist. Erfahrungs¬ 
gemäß geht dies am leichtesten, wenn 


man alles, was im Weg ist, entfernt, mit 
anderen Worten: abschießt. 

Die zur Verfügung stehende Zeit kann 
in einem Zwischenlevei aufgefrischt 
werden. Hier gilt es, heranfliegende 
Uhren aufzusammeln und Sternen aus¬ 
zuweichen. 

Die Programmierer des Spiels, David 
Perry und Nick Bruty, sind keine Unbe¬ 
kannten mehr. Hits wie TRANTOR. 
SAVAGE, EXTREME und DAN 
DARE3 sind ihrer Federentsprungen. 

Von zwei alten 
Bekannten 

Wer ein ähnlich spektakuläres Pro¬ 
gramm wie einige der oben genannten 
erwartet, wird enttäuscht werden. Die 
von diesem Gespann gewohnte vielfar¬ 
bige Grafik findet man aber auch bei 
CAPTAIN PLANET. An eine nette, 
aber kurze Tilelmelodie und einige 
Soundeffekte wurde ebenfalls gedacht. 
In atemberaubender Geschwindigkeit 


rasen die Sprites auf den armen Spieler 
zu. wodurch dessen Überleben sehr er¬ 
schwert wird. Mil etwas Übung und der 
richtigen Taktik gewöhnt man sich aber 
daran, und CAPTAIN PLANET be¬ 
ginnt, so richtig Spaß zu machen. 
Unterm Strich ein ideales Spiel für zwi¬ 
schendurch und geübte Spieler. 


CAPTAIN PLANET AND 
THE PLANETEERS 

Ilenstellcr: Mindscape 
Steuerung: Joystick oderTaslalur 
Voraussetzung: fürallcCPCs 
Zur Verfügung gestellt von: Batsoft 
Anleitung: deutsch, englisch, französi-sch. ita¬ 
lienisch 

Bemerkung: Spectrum-Version auf derglei¬ 
chen Diskelle 

Bewertung: 

Grafik; 2 Präsentation: 3 

Sound: .3 Motivation: 2 

Endnotc:2 


Die JETSONS stammen aus einer 
englischen Fernseh.serie, die bei uns 
in Deutschland ziemlich unbekannt 
ist. Nun ja, wenn sie die gleiche Qua¬ 
lität hat wie das gleichnamige Compu¬ 
terspiel, so ist dies nicht weiter 
schlimm. 

Das Spieiprinzip mutet ziemlich 
nostalgisch an. Um die gestellten Auf¬ 
gaben zu lösen - George befreien. Judy 
zu einem Kuß von ihrem Licblingspop- 
star verhelfen müssen vor allem Ge¬ 
genstände gefunden werden. Diese be¬ 
wirken dann irgendetwas. Weil man je¬ 
doch, dank derrechl kindlich ausgefal¬ 
lenen Grafik, kaum erkennen kann, was 
man da aufgesammelt hat, weiß man 
zunächst auch nicht, was man damit an- 
fangen kann. 

Nostalgie gefällig? 

Nebenbei blubbert eine Musik aus dem 
Lautsprecher, die allerdings auch nicht 
zu höherem Spieleglück beiträgt. 
Während das Spiel von schräg oben 
dargestellt wird, ist die Kollisionsab¬ 
frage zweidimensional. Dadurch ver¬ 
liert der Spieler zwar keine Energie, 
aber einige Nerven. Die Feinde stellen 
sowieso kein echtes Hindernis dar. Le¬ 
diglich die Zeit ist knapp bemessen. 
Zwischen den einzelnen Levels gibt es 
immer noch Flugsequenzen, die jedoch 
auch nicht unbedingt mehr Spielspaß 
bieten. 

Grafik, Programmierung und Spiel¬ 
prinzip hinterlassen den Eindruck, als 
ob es sich hier nicht um ein Produkt aus 
dem Jahre 1992, sondern eher um eines 
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aus dem Jahr 1985 handell. 

Wer gerne ein Spiel hat, in dem es viele 
Räume zu erforschen gibt, kann sich 
JETSONS einmal ansehen. Aber auch 
in dieser Sparte gibt es eigentlich genü¬ 
gend bessere Produkte. Größter Plus¬ 
punkt ist der recht günstige Preis der 
Diskettenversion. 


JETSONS 

HerNtdIvr: HiTec Premier 
Steuerung: Joystick oder Tastatur 
Voraussetzung: füralleCPCs 
Preis: Kassette 24.90 DM. Diskette 29.90 DM 
Zur Verfügung gestellt von: Batsofi 
.Anleitung: deutsch, englisch, französisch, ita¬ 
lienisch, spanisch 

Bewertung: 

Grafik: 4 Präsentation: 3 

Sound: 3 Motivation: 4 

Endnolc: 4 


Man muß kein Stammbaumexperle 
sein, um festzustellen, daß ROD¬ 
LAND ein naher Verwandter von 
BUBBLE BOBBLE ist: Zwei Kamera¬ 
den bahnen sich durch zahlreiche Le- 
vels ihren Weg. Dabei sind sie beson¬ 
ders scharf auf Bonuspunkte. 

Bonuspunkte gefragt 

Doch zuerst einige Worte zur Story. 
Tarn und Rim .sind zwei niedliche We¬ 
sen und Bewohner eines kleinen Dor¬ 
fes. Doch eines schönen Morgens erlei¬ 
den sie einen mittelschweren Schock. 
Ihre Mutter ist nämlich von ihren ehe¬ 
maligen Spielkameraden entführt wor¬ 
den. Brav, wie die beiden nun einmal 
sind, machen sie sich auf den Weg, die 
Mutter wieder zu befreien. 

Mil einem Zepter können sie nach den 
frechen Biestern, die einmal ihre 


RODLAND 

Hersteller: Storni 
Steuerung: Joystick oderTastalur 
Voraussetzung: füralleCPCs 
Preis: Kasselte: 34,90 D.M 
Zur Verfügunggestellt von: Batsoft 
Anleitung: deulsch.englisch, französisch, ita¬ 
lienisch 

Bemerkung: ladtstäiidig nach, auf Kassette ein 
echte.s Minus 

Bewertung: 

Grafik:! Präsentation: 3 

Sound:3 Motivation: 3 

Endnote: 3 


Freunde waren, ausholen. Wird einer 
von diesen getroffen, kann er durch die 
Luft geschleudert werden, bis er ge¬ 
schafft ist und nur noch ein Icon übrig 
bleibt. Manchmal gibt dieses nur Bo¬ 
nuspunkte. Doch oft schwirrt dann 
auch ein Schuß durch die Gegend, der 
bei den Aufräumarbeiten behilflich ist. 
Wenn alle Blumen gepflückt wurden, 
verfärbt sich der Bildschirm. Jetzt läßt 
jedes erschlagene We.sen einen Buch¬ 
staben zurück. Durch Aufsammeln des 
Wortes EXTRA erhält der Spieler ein 
Freileben. Merkwürdigerweise ist von 
dieser Wirkung der Blumen nichts in 
der Anleitung erwähnt. Diese Jagd 
nach Extraleben macht zwar Spaß, ist 
aber unrentabel. Wer das Grünzeug 
ignoriert und die Feinde möglichst 
schnell auslöscht, fährt meist besser. 

Viel verschenkt 

Da dies alles in extra süßer Grafik mit 
Zuckerguß dargestellt wird und in 
höheren Levels noch einiges - sowohl 
Hilfreiches als auch Ekliges - auf den 
Spieler wartet, könnte RODLAND ein 
tolles Spiel sein. Doch leider kommt 


wegen der zu niedrigen Ablaufge¬ 
schwindigkeit kaum richtig Laune auf. 
Eigentlich schade. 

Wenn ein Fassadenkletterer wie HUD¬ 
SON HAWK aus dem Gefängnis frei¬ 
kommt und fortan ehrlich leben will, 
dann sollte man sich eigentlich freuen. 
Doch eine Bande Ki imineller benötigt 
seine Dienste und unternimmt alles, um 
ihn wieder aufdie schiefe Bahn zu brin¬ 
gen. Nachdem er sich weigert, aus ei¬ 
nem Museum drei Kunstwerke von 
Leonardo da Vinci zu stehlen, wird sein 
Freund entführt, um ihn unter Druck zu 
setzen. Hudson bekommt Jedoch Wind 
davon, daß die Gangster die Kunstwer¬ 
ke benötigen, um mit einer Maschine 
Gold hersteilen zu können. So könnten 
sie genügend Geld und damit auch 
Macht erlangen, um die Weltherrschaft 
zu erringen. 

Hudson spielt ein 
doppeltes Spiel 

Doch vom modcnien Strafvollzug 
geläutert, schmiedet Hudson seine ei¬ 
genen Pläne. Er will zwar die Kun.st- 
werke stehlen, um damit seinen Freund 
freizubekommen, gleichzeitig aber die 
finsteren Pläne der Bande durchkreu¬ 
zen. Dies ist. in aller Kürze, die Hand¬ 
lung von Film und Computerspiel. So 
macht sich Hudson also auf den Weg 
durch eine Auktionshalle, den Vatikan 
und Leonardo da Vincis Schloß. Natür¬ 
lich weiß niemand so genau, auf wel¬ 
cher Seite Hudson denn nun eigentlich 
steht. Und so machen ihm sowohl 
Wächter und Hausmeister als auch 
zwielichtige Gestalten das Leben 
schwer. 



CAPTAIN PLANET AND THE PLANETEERS - Ein Spiel für Umwehbe- 
wußte 


JETSONS - Nach einer amerikanischen Femsehserie 
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RODLAND - Retten Sie Ihre Mutter 


HUDSON HA WK - Auf der Suche nach Leonardos Kunstwerken. 


Wenn unser Held durch die Welt geht, 
springt oder kriecht, scrollt der Bild¬ 
schirm in die entsprechende Richtung 
mit - wenn auch nicht allzu flüssig. Als 
ehemaliger Gauner hat er natürlich 
auch nicht verlernt, sich zur Wehr zu 
setzen. Er kann schlagen oder harte Ge¬ 
genstände werfen. Auch die herumste¬ 
henden Kisten kann er verschieben und 
- wenn ergänz hoch hinaus will - sogar 
stapeln. 

Daß die Grafik ziemlich einfarbig ist, 
kann man leicht verschmerzen. Die Fi¬ 
guren sind alle im Stil eines Cartoons 
gehalten - allein die verschiedenen Ar¬ 
ten, wie Hudson sein Leben aushau¬ 
chen kann, sind eine Klasse für sich. 
Dafür fehlt eine Musik ganz, cs gibt nur 
einige wenige Soundeffekte. 

Viele Ideen sorgen für 
Spielspaß 

Vom einen Ende eines Levels zum an¬ 
deren zu kommen, dabei Hindernisse 
zu umgehen und Feinde aus dem Weg 
zu räumen, das ist nicht neu. Doch die 
Programmierer haben sich einiges ein¬ 
fallen lassen, um für Abwechslung zu 
sorgen. Hier jetzt alles aufzuzählcn, 
würde den Spaß am Spielen nehmen. 
Erwähnt sei nur, daß man an einigen 
Steilen ganz schön herumtüfteln muß, 
wie es weitergeht. Manchmal hilft so¬ 
gar ein vermeintlicher Feind, eine 
scheinbar unüberwindliche Stelle zu 
meistern. Eine davon ist gleich am An¬ 
fang des Spiels. Davon sollte man sich 
nicht frustrieren lassen, danach wird’s 
wieder etwas leichter. 

In anderen Abschnitten kommen auch 
die Einflüsse von scrollenden Schieß¬ 
spielen oder Labyrinthen zum Zug. Ei¬ 


ne sehr gelungene Kombination aus 
Klassikern wie RICK DANGEROÜS 
und GREAT GIANA SISTERS, die je¬ 
doch genügend Neues bietet, um ein ei¬ 
genständiger Hit zu werden. 

Die meisten Spiele zu einem Film be¬ 
stehen aus mehreren Abschnitten mit 
grundverschiedenem Spielablauf. 
HUDSON HAWK folgt dieser Regel 
nicht, man hat sich auf ein Spielprinzip 
beschränkt und dies dafür um so besser 
ausgearbeitet. Sicher eine richtige Ent¬ 
scheidung. So hat man nicht das Ge¬ 
fühl . daß einfach ein paar Szenen nach¬ 
programmiert und aneinandergereihl 
wurden, sondern daß es ein Spiel aus ei¬ 
nem Guß ist. Ein .sehr gutes noch dazu. 


HUDSON HAWK 

Hersteller: Ocean 
Steuerung: Joystick oderTastalur 
Voraussetzung: furalleCPCs 
Preis: 79.95 DM 

Zur Verfügung gestellt von: EDV-Obermeier 
Anleitung: deutsch, englisch, französisch, ita¬ 
lienisch 

Bemerkung: lädt nach 
Bewertung: 

Grafik: 2 Prilsentation: 2 

Sound:4 Motivation: I 

Endnote: I 


BÄCK TO THE FUTURE, PART 3 
ist, wie könnte es anders sein, das Spiel 
zum Film “Zurück in die Zukunft-Teil 

3”. 

Erwartungsgemäß entsprechen die vier 
Levels Szenen aus dem Film. Im ersten 
Teil muß die Lehrerin Clara davor ge¬ 
rettet werden, mit ihrer Kutsche in eine 
Schlucht zu .stürzen. Doc springt auf 
sein Pferd und reitet ihr hinterher. Auf 
dem Bildschirm sieht man ein Pferd 
von links nach rechts galoppieren, über 


Hindernisse hinwegspringen oder sich 
darunter ducken. So manches kann 
auch einfach abgeschossen werden. 

Marty im Wilden Westen 

Diese Darstellung wird immer wieder 
unterbrochen. Dann sieht man das Ge¬ 
schehen von oben, während man durch 
eine Schlucht reitet, in der sich Kaval¬ 
lerie und Indianer ein Gefecht liefern. 
Von deren Kugeln sollte man sich 
natürlich nicht erwischen lassen. 
Danach geht’s auf dem Straßenfest von 
HiU Valley weiter. Marty hat einen 
Schießstand entdeckt und greift zum 
Gewehr. Dieser Teil ist ein Shoot-Out 
im WESTPHASER-Stil. bei dem auf 
Pappbanditen. Enten und ähnliches ge- 
schos.sen wird. Die Munition ist nicht 
begrenzt, dafür aberdie Zeit. 

Doch die schöne Feier wird von Bu- 
fords Bande gestört. Marty muß nun 
Doc vorderen Angriffen schützen. Da¬ 
zu bewaffnet er sich mit Kuchentabletts 
und setzt diese wie Frisbees gegen die 
Gauner ein. Wenn der aktuelle Vorrat an 
Tabletts verbraucht ist, können am 
Bildschirmrand neue geholt werden. 
Doch leider hält unser Held nur eine be¬ 
grenzte Anzahl von Schüssen aus den 
Revolvern der Gangster aus. 

Nur ein Abklatsch von 
bekannten Spielen 

Nun muß der DeLorean nur noch auf ei¬ 
ne hohe Geschwindigkeit gebracht 
werden, um ins Jahr 1985 zurückzu¬ 
kehren. Dazu wird er von einer 
Dampflokomotive angeschoben. Auf 
dieser läuft Marty entlang und kämpft 
sich an entgegenkommenden Gestalten 
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BACK TO THE FUTURE, FART S ~ Der erste Levei ist frustrierend TOYOTA CELICA GT RALLY - Die empßndlkhe Steuerung soll wohl 
schwer computergesteuerte Fahrzeuge ersetzen 


- Gangster und Zugpersonal - vorbei. 
Dabei muß er Feuerklötze nach unten 
werfen, um den Zug zu beschleunigen. 
Die Szene in der Schlucht ist ein 
Schwachpunkt der ansonsten sehr or¬ 
dentlichen Ausführung des Pro¬ 
gramms. Doch leider haben die Pro¬ 
grammierer offensichtlich wenig Ideen 
gehabt - es wird so gut wie nichts gebo¬ 
ten. was es nicht schon mindestens ein 
halbes dutzendmal mindestens genau¬ 
so gut gab. So i.st die Hauptmolivation -- 
trotz der hübschen Grafik und der We¬ 
sternmusik alle Runden zu sehen. 
Leider ist .schon der erste Level so 
schwer, daß einem die Lust am Spiel 
ziemlich vergällt wird. Trotzdem um 
Klassen besser als TeiI2. 


BACK TO THE 
FUTURE, PART 3 

Hersteller: Image Works/ Mirrorsoft 
Steuerung: J oystick oder Tastatur 
Voraussetzung: Tür alle CPCs 
Preis: 74.50 DM 

Zur Verfügung gesteUl von: EDV-Obermeier 
Anleitung: deutsch, englisch, französisch, ita¬ 
lienisch 

Bemerkung; lädt häufig nach 
Bewertung: 

Grafik; 2 Präsentation:! 

Sound:2 Motivation:3 

Endnote:.3 


England, Finnland und Mexico - eines 
haben diese Staaten gemeinsam: Renn¬ 
strecken, die in TOYOTA CELICA GT 
RALLY gemeistert werden müssen. 

Achtung, Kurve! 

Im Gegensatz zu anderen Autorenn¬ 
spielen steht Ihnen hier jedoch ein Bei¬ 
fahrer zur Verfügung. Dieser zeigt an, 


wann Sie mit Kurven zu rechnen haben. 
Wer sich nicht auf den mitgelieferten 
Copiloten verlassen will, kann selbst 
eingreifen. Bei dieser Option wird die 
Rennstrecke von oben gezeigt, und Sie 
können an gefährlichen Stellen selbst 
Markierungen setzen. Diese werden 
dann während des Rennens angezeigt. 
Im Steuerungsmenü kann eingestellt 
werden, wie empfindlich die Steuerung 
reagiert. Aber schon in der leichtesten 
Stufe neigt die Steuemng zu Überreak¬ 
tionen. Das führt dazu, daß der Wagen 
bei der geringsten Joyslickbewegung 
von der einen Fahrbahnseite zur ande¬ 
ren geschleudert wird. Dies soll wohl 
besonders realistisch sein, ist es aber 
nicht. Immerhin wird dadurch der 
Schwierigkeitsgrad gesteigert. 

Wem das noch nicht genug ist, kann 
die Reverse-Sleering-Option wählen. 
Wenn Sie nach rechts lenken, fährt der 
Wagen nach links und umgekehrt. 

Auf der getesteten Kassetlcnversion ist 
keine Musik vorhanden, die Soundef¬ 
fekte während des Spiels bestehen 
hauptsächlich aus den üblichen Moto¬ 
rengeräuschen. 

Die grafische Darstellung ähnelt LO¬ 
TUS TURBO ESPRIT sehr stark: 
schnell, sauber, aber ziemlich einfar¬ 
big. 

Rennsimulation oder 
Rennspiel? 

Ein echtes Manko ist das Fehlen von 
anderen Rcnnteilnehmern - der einzige 
Gegner ist das Zeitlimil. Dadurch ver¬ 
liert die ganze Sache natürlich an Reiz. 
Durch die vertrackte Steuerung ist das 
Spiel trotzdem nicht zu einfach. Aller¬ 
dings ist es eine merkwürdige Mi¬ 


schung zwischen einer Simulation - 
dazu ist es aber nicht komplex genug - 
und einem einfachen, actionbetonten 
Rennen. Doch seinen Frust kann man 
nicht durch das Donnern über Betonpi¬ 
sten abla.ssen. 

TOYOTA CELICA ist nicht gerade ei¬ 
ne lahme Ente, aber ganz gewiß auch 
kein Renner. 


TOYOTA CELICA GT 

Hersteller: GremlinGraphics/GBH 
Steuerung; Joystick txler Tastatur 
Voraus-setzung: füralieCPC.s 
Preis: 7.99 engl. Pfund {Kassette) 

Zur Vcrfüguiiggestclll von: Gremün Gra¬ 
phics 

Anleitung: deutsch, englisch, italienisch 
Bemerkung: lädt nach 

Bewertung: 

Grafik: 3 Präsentation; 2 

Sound: 4 Motivation: 2 

Endnotc; 3 


Andreas Lober/jg 


Die Muster stellten uns zur Verfü¬ 
gung: 

EDV-Obermeier 
BünderStraße20 
W-4972 Löhne 1 

Batsoft 

Donnerschweerstraße 33 
2900 Oldenburg 

Gramlin Graphics Software Limited 
CarverHüuse 
2-4 Carver Street 
Sheffield S14FS 
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Daten auf Reisen 

Terminal-Programm und Mailbox 

Unter Nutzung eines TerminaUProgramms wird cs möglich, mit einer 
Mailbox zu arbeiten. Wir stellen Ihnen zw ei solcher Terminal-Programme 
vor und erklären Ihnen, wie eine Mailbox funktioniert. 


Es gibt unzählige Terminal-Program¬ 
me. Zwei Programme aus der Public 
Domain sind MEX und IMP. Sie arbei¬ 
ten auf allen CPCs unter CP/M 2.2 und 
CP/M plus. Hardware-Voraussetzung 
ist eine serielle Schnittstelle von 
Schneider oder Valcom. Folgende Ver¬ 
sionen sind verfügbar: 

MEXCPSP: CP/M+ RS 232 SCHNEI¬ 
DER 

MEXCPVP: CP/M+RS 232 VALCOM 
MEXCPS: CP/M 2.2 RS 232 SCHNEI¬ 
DER 

MEXCPV: CP/M 2.2 RS 232 VAL¬ 
COM 

IMP-S: CP/M RS 232 von SCHNEI¬ 
DER 

IMP-V: CP/M RS 232 von VALCOM 
Die Bedienung der einzelnen Versio¬ 
nen ist identi.sch. Der Unterschied be¬ 
steht lediglich in der Programmierung 
der seriellen Schnittstellen, da diese ei¬ 
nen unterschiedlichen Hardware-Auf¬ 
bau haben. 

MEX wird gestartet mit der Eingabe 
>MEX <ENTER> 

Nach dem Start meldet sich MEX mit 


einem kleinen Menü. Als nächster 
Schritt ist die Anpassung der Daten¬ 
übertragungsrate an das Modem oder 
an den Akustikkoppler vorzunehmen. 
Viele Modems erkennen automatisch 
die Datenübertragungsrate vom Rech¬ 
ner und stel len sich darauf ein. 

MEX»SET 1200 <ENTER> 

setzt die Übertragungsrate auf 1200 
bps. MEX arbeitet in zwei unterschied¬ 
lichen Modi. Der Befehlsmodus dient 
zur Übergabe von Steuerbefehlen. Im 
Terminal-Modus werden alle eingege¬ 
benen Zeichen an die serielle Schnitt¬ 
stelle ausgegeben und gelangen damit 
an das Modem. In den Terminal-Modus 
gelangt man mit <T>, <E> oder <L>. 
“T” ist der echte Terminal-Modus. 

Im Befehlsmodus können auch das 
Laufwerk und die User-Ebene gewech¬ 
selt werden: 

MEX»LOG DO <ENTER> 

macht Laufwerk D zum aktuellen Lauf¬ 
werk. Aus dem Terminal-Modus ge¬ 
langt man mit <ESC>-i-<E> wieder in 


den Befehlsmodus. Das ist dann not¬ 
wendig, wenn Binärdateien mittels 
spezieller Dalenübertragungsprotokol- 
le übertragen werden sollen. Diese 
Übertragung kann nur aus dem Be¬ 
fehlsmodus gestartet werden. Der 
Wechsel vom Terminal-Modus in den 
Befehlsmodus erfolgt ohne Unterbre¬ 
chung der gerade laufenden Verbin¬ 
dung des Modems. 

Sollte es einmal passieren, daß in einer 
aktiven Verbindung nichts mehr funk¬ 
tioniert, so ist die Notlösung (Terminal- 
Modus): 

<ESC> H- <E> 

MEX»DSC <ENTER> 

Damit wird die Verbindung durch De¬ 
aktivieren der DTR-Leitung unterbro¬ 
chen, und das Modem legt auf. Diese 
Art des Beendens einer Sitzung sollte 
aber nur in Notsituationen verwendet 
werden. 

Wichtig für die Arbeit mit einer Mail¬ 
box ist ein LOGFILE, also ein Mit¬ 
schnitt der Sitzung (Protokoll). Dieses 
emiöglicht auch nach Beendigung der 
Sitzung eine Kontrolle über alle Akti¬ 
vitäten, da alle gesendeten und empfan¬ 
genen Zeichen gespeichert werden. 

Die Eingabe von 

MEX»T logfilename <ENTER> 

bringt das Programm in den Terminal- 
Modus und legt das LOGFILE “logfile¬ 
name" an. Zur Kennzeichnung dieses 
Zustandes wird am Zeilenanfang je¬ 
weils ein ausgegeben. Zusätzlich 
besteht die Möglichkeit einen Drucker 
mitlaufen zu lassen. Der Drucker wird 
vom Terminal-Modus aus mit 
<ESC>-t-<P>eingeschaltet. 

Auch ein Druckerprotokoll 
kann verwendet werden 

Neben dem Empfangen und Senden 
von Mails (Nachrichten an andere User, 
diese Mails können öffentlich oder pri¬ 
vat sein) können auch Binärdaicien 
übertragen werden. Da aber die Tele- 
fonleitungen niemals störungsfrei sind 
(Knackgeräusche oder ähnliches), 
würde nur selten ein übertragenes Pro¬ 
gramm richtig funktionieren. Deshalb 
gibt es Dalciübertragungsprotokolle. 
Die zu übertragenden Dateien werden 
blockweise und mit einer Prüfsumme 
(CRC) übertragen. Der empfangende 
Rechner bildet ebenfalls eine Prüfsum¬ 
me und vergleicht diese mit der des Ab- 
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Senders. Slimmcn die Summen über¬ 
ein, gibt der Empfängerrechner sein 
Okay an den Absender, und der nächste 
Block wird übertragen. Ist das nicht der 
Fall, wird derselbe Block nochmals 
übertragen. Die bekanntesten Proto¬ 
kolle sind XMODEM, YMODEM und 
ZMODEM. Alle drei Protokolle kön¬ 
nen Binärdateien fehlerfrei trotz 
Störungen auf der Telefonleitung über¬ 
tragen. Alle Übertragungsprotokolle 
sind bei allen Datenübertragungsraten 
nutzbar. 

Protokolle für alle 
Übertragungsraten 

Das Übertragen einer Datei mittels Da- 
leiübeitragungsprotokoll aus MEX 
oder IMP heraus ist problemlos mög¬ 
lich. Dazu muß sich der Nutzer im Be- 
fchlsmodus befinden. Wenn sich MEX 
meldet, wird *‘SX'’ (SENDEN XMO¬ 
DEM) oder “SB” (SENDEN BATCH 
YMODEM) eingegeben. Danach er¬ 
folgt die Angabe des Dateinamens oder 
mehrerer Dateinamen bei “SB”. 

“SX beispiel.txt” .sendet die Datei BEI- 
SPIEL.TXT im XMODEM-Protükoil. 
“SB b*.txt” sendet alle Dateien, die mit 


Glossar 

ARC: ein Programm, das Dateien in 
einer Archivdatei zusammenfaßt 
und komprimiert. 

CRC: Cyclical Redundancy Check 
(CRC-16) - 2 Byte lange Prüfsum- 
nie; der Empfänger erkennt daran ei¬ 
nen Übertragungsfehler. 

FTP: File- oder Dateitransferpro¬ 
gramm. 

XMODEM: FTP zur fehlerfreien 
Datenübertragung, block weise in 
128 Byte oder 1024 Byte großen 
Blöcken. 

YM(3DEM: FTP zur fehlerfreien 
Datenübertragung, blockweise in 
1024 Byte großen Blöcken mit 
Übertragung des Dateinamens, Da¬ 
tums und anderen Informationen. 
Wichtigste Verbesserung gegenüber 
XMODEM ist das Übertragen meh¬ 
rerer Files mit einem Befehl. Diese 
Übertragungsart wird Batch-Mode 
genannt. 

BRETT: speziell bei Mailboxen ver¬ 
wandter Begriff für Bereich. In ei¬ 
nem solchen Bereich können sich 
Nachrichten. Programme und ande¬ 
res befinden. 


einem “B” beginnen und als Erweite¬ 
rung .TXT haben im YMODEM-FTP. 
Das funktioniert aber nur, wenn die Ge¬ 
genstelle, also beispielsweise die Mail¬ 
box, aus dem Terminal-Modus heraus 
dazu aufgeforderl wurde, die Bereit¬ 
schaft für den Empfang der Daten her¬ 
zustellen. 

Dazu muß meist die “FILEBOX” der 
Mailbox ausgewählt werden und in 
dem entsprechenden Mailboxbrett der 
Empfang der Daten ausgelöst werden. 
Dieser Verfahrensweg unterscheidet 
sich etwas bei den verschiedenen Mail¬ 
boxen. Kurz vor der Datenübertragung 
erfolgt über ein Menü die Abfrage des 
Übertragungsprotokolls, oder man 
muß das Protokoll in einem speziellen 
Menü einstellen. Der zweite Weg hat 
den Nachteil, daß man fest an das ein¬ 
gestellte Protokoll gebunden ist. 

Das eingestellte Proto¬ 
koll muß übereinstimmen 

Wichtig ist die Übereinstimmung des 
eigenen Protokolls mit dem der Mail¬ 
box. YMODEM können nicht alle 
Mailboxen verarbeiten. ZMODEM 
können die MEX- oder IMP-Program- 
nie nicht verarbeiten. 

Die Dateiübertragung kann am Moni¬ 
tor verfolgt werden. “# Send xxx” zeigt 
die gerade gesendete Blocknummer. 

Der Empfang einer Datei ist ähnlich ge¬ 
staltet wie das Senden einer Datei. “RX 
beispiel.lxt” schaltet den Empfänger 
ein. Die.ser legt die Datei BEISPIEL 
.TXT an und schallet auf das XMO- 
DEM-Protokoll. 

“RB” schallet den Empfänger ein und 
erwartet den ersten Dateinamen im 
YMODEM-Protokoll-Batch-Mode. 

Im XMODEM-Protokoll wird bei 1200 
bps für die Übertragung eines 128 Byte 
großen Blocks etwa eine Sekunde und 
für einen 1024 Byte großen Block wer¬ 
den etwa acht Sekunden benötigt. 

128-Byte-Blöcke haben den Vorteil, 
daß Dateien auch bei schlechten Über- 
tragungsverhältnissen in vertretbaren 
Zeiträumen fehlerfrei übertragen wer¬ 
den. Ein Nachteil ist, daß durch das 
Rücksenden der Empfangsquittung die 
Übertragung länger dauert. 

Der Vorteil der 1024-Byte-Blöcke Lsi, 
daß die Daten schneller übertragen 
werden. Bei schlechten Leitungen kann 
die Übertragung aber entschieden län¬ 
ger als bei den 128-Byte-Blöcken dau¬ 
ern. Die Erklärung dafür ist ganz ein¬ 
fach: Tritt während eines Blocks ein 
Fehler auf. muß jeweils wieder der ge¬ 


samte Block übertragen werden. Die 
Möglichkeit, daß bei der folgenden 
Übertragung ebenfalls wieder ein Feh¬ 
ler auftritt, ist bei größeren Blöcken 
(acht Sekunden gegenüber einer Se¬ 
kunde) entsprechend höher. 

Trotz kurzer Blöcke 
schnelle Übertragung 

Durch den Betrieb einer Mailbox lernt 
man viele gleichgesinnte Leute ken¬ 
nen. Deshalb haben viele den Wunsch, 
selbst eine Mailbox aufzubauen. Für 
den CPC wurde kein eigenes Mailbox¬ 
programm entwickelt. Man kann sich 
aber mit CP/M-PD weiterhelfen. Aus 
den USA kommt ein in Turbo Pascal 
unter CP/M entworfenes Paket. Dieses 
nennt sich PICS und ist nach einigen 
Anpassungen auf dem CPC unter CP/M 
lauffähig. Es bietet die Möglichkeit, 
mehrere Nachrichtenbreltcr und File- 
Bereiche zu erstellen und allgemeine 
Infotexte abzurufen. Es kann eben al¬ 
les, was man von einer Mailbox erwar¬ 
tet. Die größte Anpassungsarbeit ist in 
die Bedienung der RS 232 zu stecken. 
Hierfür liegen aber schon viele Lösun¬ 
gen vor. 

Das System wurde vom Autoren gete¬ 
stet, bei ihm ist auch eine Softwarean- 
pa.ssung an die RS 232 von SCHNEI¬ 
DER erhältlich, Interressenlcn wenden 
sich bitte an folgende Adresse: 


DMV-Verlag 

Redaktion CPC International 
Kennwort DFÜ 
Postfach 250 
3440 Esch Wege 


Zum Schluß noch einige Telefonnum¬ 
mern, unter denen Mailboxen zu errei¬ 
chensind. 


Telefonnummer Name der Mailbox 


0223683007 

03046423 36 

0307919269 

03033285 63 

0304047955 

0621413091 

0525121286 

0614221161 

089293881 


ShadowColonge 

C.P.M 

FidoNet Berlin 

Netmbx 

Suicidal 

TeleboxDBP 

Paderpox I 

ATARI 

TBUS 


In vielen Mailboxen finden .sich Listen 
mit Nummern weiterer Boxen. 

Olaf Matthäi/Jg 
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SuperBOSS 

Programmieren Sie die CP/M-Ebene 

Was der Joyce alles kann, wenn man ihm ein w enig unter die Arme greift, hat 
er sicherlich schon in vielen Situationen bewiesen. Nur eben diese kleinen 
HilfsmittcUdiedas Arbeiten am Joyce soabwechslungsreich und vor allem 
komfortabel gestalten, werden leider immer rarer. Beobachtet man jedoch 
den Markt etwas genauer, so findet man garaniert hier und da etwasäußerst 
Interessantes. So zum Beispiel den SuperBOSS, einen Software-Aufsatz für 
dasCP/M-Betriebssystemdes Joyce. 


Mit dem Programm SuperBOSS hat die 
englische Software-Schmiede Ency- 
clasoft ein hervorragendes Programm 
auf den Markt gebracht, mit dem sich 
auf einfache Weise Menüs in die CP/M- 
Ebcne einbinden lassen. Hierbei wer¬ 
den Taslatiireingaben berücksichtigt, 
und Variablen können benutzt werden. 
Weiterhin können logische Verknüp¬ 
fungen eingebracht und Programme 
gestartet werden. Dies alles läuft auf ei¬ 
nem “sauberen” Bildschirm ab und 
kommt vollständig ohne den bekannten 
A>-Promptaus. 

SuperBOSS ist in englischer Sprache 
gehalten. Mit etwas Zeit und Geduld ist 
es jedoch kein Problem, die Meldungen 
ins Deutsche zu übersetzen. Da die 
Sub-Dateien in reinem ASCII geschrie¬ 
ben .sind, i.st die Bearbeitung mit Jedem 
beliebigen Editor möglich. Am besten 
geeignet ist hierfür LocoScript. Aller- 
tlings darf nicht vergessen werden, die 
Dateien anschliefknd wieder in ASCII- 
Dateien umzuwandcln. 

SuperBOSS selbst besteht aus zwei 
Programmen mit den Namen 
RUN.COM und S.COM. RUN.COM 
ersetzt das auf den Syslemdisketten 


mitgelieferlc Dienstprogramm SUB- 
MIT.COM, welches für die Abarbei¬ 
tung von sogenannten Stapeldateien 
zuständigist. 

Dieses Dienstprogramm hat aber einen 
entscheidenden Nachteil, der Ihnen 
eventuell auch schon des öfteren aufge¬ 
fallen ist. Die Rede ist von der Arbeits¬ 
weise des Dienstprogramms SUB- 
MIT.COM. Wird nämlich eine Stapel- 
dalei (zum Beispiel PROFILE.SUB) 
gestartet, wird zunächst der Inhalt die¬ 
ser Datei komplett eingelesen und im 
aktuellen Laufwerk in eine temporäre 
Datei mit dem Namen SYSIN59.$S$ 
geschrieben. 

Teile dieser Datei werden dann wieder¬ 
um in den 1 ligh-Memory-Bereich des 
Joyce ausgelagert. Dies bedeutet im 
Klartext, daß jedesmal, wenn Program¬ 
me aus einer Submii-Daici heraus ge¬ 
startet werden, weniger Speicherplatz 
zur Verfügung steht, als wenn diese 
Programme direkt vom A>-Prompl aus 
gestartet werden. Dieser Nachteil kann 
sich zum einen auf die Arbeitsge¬ 
schwindigkeit des aufgerufenen Pro¬ 
gramms auswirken, zum anderen exi¬ 
stieren über auch Programme, die sich 


überhaupt nicht von einer Submit-Da- 
tei starten lassen. 

Wo liegt nun aber der Unterschied zwi¬ 
schen RUN.COM und SUBMIT 
.COM? Das Programm RUN.COM be¬ 
legt zunäch.st einmal nur ein kByte, 
SUBMIT.COM ganze .sechs kByte auf 
Diskette. Dies ist jedoch nicht der ein¬ 
zige Unterschied. 

RUN.COM macht sich die Eigenart 
von CP/M zunutze, daß jedesmal vor 
dem Start eines Programms nach einer 
Datei mit der Endung “.SUB” gesucht 
wird. 

Dateikunde 

ln einer Sub-Datei gespeicherte Infor¬ 
mationen lassen sich am einfachsten 
mit einem normalen Dateieintrag ver¬ 
gleichen. Sie belegen jeweils 128 
Bytes. Das erste Byte enthält die Länge 
des Kommandos, dann folgt das Kom¬ 
mando selbst und anschließend ein 
Leerzeichen. Das Merkwürdige an ei¬ 
ner $$$.SUB-Datei ist jedoch, daß das 
zuerst auszuführende Kommando am 
Ende der Datei steht. Die $$$.SUB-Da- 
tei wird nun vom Joyce systematisch 
von hinten nach vorne abgearbeitet. 
Dadurch entfällt die Verschiebung ein¬ 
zelner Informationen in den High-Me- 
mory-Bereich. Die in einer $$$.SUB- 
Datei enthaltenen Kommandos benöti¬ 
gen den gleichen Speicherplatz, als 
wenn sie über die Tastatur eingegeben 
würden. Dies hat zur Folge, daß Pro¬ 
grammen, die nicht mittels SUBMIT 
.COM gestartet werden können, mit 
RUN.COM unter die Arme gegriffen 
wird. 

Nun gehört zu SuperBOSS aber noch 
ein zweites, äußerst leistungsföhiges 


«fl s t r a d P C U 
Hier kocrmtc lhr^l^ steken 


P « r s 0 n a l 


M t B u 


Rwglicli» OpUmtn 


HtUI 

i icktrliitskopi« 
indtuch auf stt 
NaiiuMS iluli 
Prdnt - Tnevera 
SwirCalc,- tifeU 
Niuo Otstsn . 

I - Utility N«nue 

• - Rueckkehr im Cf/N 
Zur ftusuaht ntsprMhn 
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1 - limtarji z<i$n 
i • {atfun) kopier«! 
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5 - >atei druden 
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SuperBOSS eiiauhl es dem Anwender, komplexe Menüstrukturen zu ent- SuperBOSS: Neben einzelnen Tasten können auch Strings mit frei wöhl- 
werfen barer Länge abgefragt werden 
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* R s t r il rC M 
Hier kMnntc Ihr Hve st()i«n 
l(rsoRil CPH nenn 


SurtrBOSS Kilfe 

i iM ist MM hMipstritiin vm Svirloss. Ss btfinicn sieh vielt latein ad 
lestr liuette, aber di« S«erlO» nrosraiwe selbst btleien nur Ik. - Alle rest- 
hebta Mtfiea enthiUen das bndlgch und leisritle - *it dieses Ktnue. 
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J der ausdrucken lü lassen, hs Xandh 
ann auf M oder Endlospafier erfelj 
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IS ea. Sd Seiten. ler Ausdruck 
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an. 
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erschliew die Master (isk an einen sickeren Ort. biest SichH'heitskfpie k 4 im 
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Sub-Itpnues) 3 UM 4 des Mavptneniies ddi ' 
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en Prevanne varhanden sind, bie Optiun 9 (otilitg-Menu) stellt mtili 
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UnifdUf’reiche liUfeseiien erleiclueni die Arheil mit SiiperBOSS 


Trutz der unterschiedlichen liskeUenfemate Tür den KN «ird SupplOSS auf einer nur* 
na ?n 'baU-taluVIiskette geliejert. Dies bedegtpt, ^ Sie das fregrann an Ihre per- 
selidien Hthaltnisse anpasien nuSn. erstellen Sie sieb deshalb als erstes esse Surt- 
diskette, ftf die Sit eine finutierte Leerdi^ette benetigtn, auf die dam die Oateien 
der Super-BOSS 'Master bisk' ki^iert verden. 

bitser Teil der SuperBOSS benonstraticn führt diese drbtiten für Sie autonatisch aus. 
Sie benütigen dafür aber 

» entueder eine fomatierle Leerdiskette, 

X »der ()ne Diskette, (oder Pestplatte) n|t nindestens 17W freier Spej^erkapaiität, 

X »da eine imfomatierie liskette um eine biskettc nit den ‘tlSCXIf* frorann 

i^!["enie 9?e^'' ^ verfügen, grt« Sie an besten 

rm «enu (Minn) 

un sichcrzuslellen, daO genügend ^ieherplatz in H-Laufutrk »orbandet ist, 


laste QIT oder STOP für kitedikehr lui Kauptnenue 


oder ueiter nlt anderer Taste 


n u riw naechste Seite ! Taste \ md XEHJm fwr Havtanug / nL oda -nL b 

er -nF <«id UTUn) un n Zeilen in. Seiten ver- oder zurudi »i Dlattem 


bn, 


DISPLAY zeigt Ihre Texte komfortabel auf dem Bildschirm an 


Programm. Es belegt nur 5 kByte. bie- 
let aber über 25 Befehle, um die CP/M- 
Ebene zu programmieren. Mit S.COM 
lassen sich Fenster, Auswahlmenüs 
und Dialogboxen erstellen. Text läßt 
sich an jeder beliebigen Position auf 
dem Bildschirm darstellen. So können 
auch Hilfelexte in Fenstern ausgegeben 
werden. Ein eindrucksvolles Bild über 
die Leistungsfähigkeit von Super¬ 
BOSS vermitteln die auf der Original- 
Diskette vorhandenen Demo-Routi¬ 
nen. 

Außer RDN.COM und S.COM sind auf 
der Diskette noch weitere nützliche 
Utilities vorhanden. Hierbei handelt es 
sich um das Programm COPY.COM, 
das ein Programm auf ein anderes Lauf¬ 
werk oder in einen anderen U.ser-Be- 
reich kopiert. 

Das Programm L1ST.COM dient zur 
Ausgabe von ASCII-Dateien auf dem 
Drucker. 

Das PD-Utilily D.COM listet das In¬ 
haltsverzeichnis einer Diskette sortiert 
aufdem Bild.schirm auf. 

Zu guter Letzt findet sich auf der Dis¬ 
kette noch das Programm DIS 
PLAY.COM. Es arbeitet ähnlich dem in 
der letzten Ausgabe vorgestellten 
XTYPE.COM. 

Zusätzliche Power 

S.COM bietet, wie schon gesagt, eine 
Vielfalt neuer Befehle für den Joyce. 
Nachfolgende Li.slc soll Ihnen zeigen, 
was in dieser CP/M-Erweiterung 
steckt. 

xx,yy oder xx,yy,Text: Setzt den Cursor 
auf die angegebene Bildschinnposition 
oder gibt einen Text an dieser Position 
aus. 

BOX xl.yl,x2,y2: Zeichnet einen Rah¬ 


men auf den Bildschirm. 

CLEAR: Löscht den Bildschirm und 
setzt den Cursor zurück oder löscht den 
Bildschirm zwischen zuvor definierten 
Zeilen. 

ECHO: Gibt einen Text an der aktuellen 
Cursorposition aus. 

INVERSE: Der nachfolgende Text 
wird invers aufdem Bildschinn ausge¬ 
geben. 

NORMAL: Der nachfolgende Text 
wird im normalen Modus ausgegeben. 
ON/OFF: Schaltet den Cursor an oder 
aus. 

SCROLL UP/DOWN: Scrolll einen 
Text in einem definierten Fenster auf 
oder ab. Mit dieser Funktion lassen sich 
sehr i ntcressante Effekte erzeugen. 
STATUS ON/OFF: Schaltet die Status- 
zeilecinoderaus. 

UP hh: Der Cursor wird um hh Zeilen 
nach oben bewegt. 

WINDOW xl.yl,x2.y2 oder WIN¬ 
DOW: Erzeugt ein Bildschirmfenster. 
Der Text wird nur innerhalb dieses Fen¬ 
sters ausgegeben. WINDOW ohne Pa¬ 
rameter löscht alle Fenster. 

WWRAP ON/OFF: Schallet den auto¬ 
matischen Zeilenumbruch ein oder aus. 
CONVERT: Wandelt eine numerische 
Variable in eine String-Variable. 
ENTER: Stoppt die Ausführung einer 
Sub-Dalei und wartet auf eine Tcxiein- 
gabe. Die Länge der möglichen Text¬ 
eingaben kann bestimmt werden. 

GET: Holt eine Variable aus dem Spei¬ 
cher. 

PRESS: Stoppt die Ausführung einer 
Sub-Datei umJ wartet auf einen Tasten¬ 
druck. Mil dem Befehl PRESS lassen 
sich außerdem die Tasten definieren, 
die durch diesen Befehl akzeptiert wer¬ 
den. 

RESET: Setzt eine IF-Struktur zurück. 


Dieser Befehl steht im Zusammenhang 
mit IF, AND, OR, ELSE und ENDIF. 
Mil diesen Befehlen können Entschei¬ 
dungen innerhalb einer Sub-Datei ge¬ 
troffen werden. Bedingungen lassen 
sich fesllegen und überprüfen. Diese 
Befehle ermöglichen im Prinzip eine 
Programmierung von Sub-Dateien. 
SAVE: Schreibt eine Variable in den 
Speicher. 

SET: Mit diesem Befehl lassen sich Va¬ 
riablen spezifizieren. 

ABORT: Ermöglicht es, eine Sub-Da¬ 
tei abzubrechen. ohne daß diese kom¬ 
plett ausgeführt wird. Weiterhin kön¬ 
nen mit Hilfe dieses Befehls Program¬ 
me oder weitere Sub-Dateien direkt ge¬ 
startet werden. 

GROUP: Ermöglicht den Wechsel in 
einen anderen User-Bereich. 
LAUNCH: Prüft die innerhalb einer 
Sub-Datei festgelegien Variablen und 
ermöglichl den Start von anderen Pro¬ 
grammen oder Sub-Dateien unter vor¬ 
gegebenen Bedingungen. Durch diesen 
Befehl kann außerdem der Joyce veran¬ 
laßt werden, daß er sich nach dem Ende 
des Programms so verhält, als sei er ge¬ 
rade eingeschaltet worden. Es wird also 
wieder nach einer Sub-Datei gesucht 
und im Erfolgsfal 1 abgearbeitet. 

QUIT; Dieser Befehl löscht die Sub- 
Datei, setzt den Bildschirm und den 
Cursor zurück und schaltet den Bild¬ 
schirm wieder auf normale Darstel¬ 
lung. 

Richard Walther/rs 


Wer nun Interesse an diesem Programm 
gefunden hat, kann es für 11,95 Pfund 
bei folgender Adresse beziehen: 
Encyclasofl, Hyficlds Grove, Audlem. 
Crewe, CW3 OLB, Great Briiain. 
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Eine der Mendelschen Regeln besagt, 
daß zum Beispiel bei der Kreuzung ei¬ 
ner reinerbigen roten mit einer reinerbi¬ 
gen weißen Blüte deren Töchter die 
Farbe Rosa annehmen. Diese sind dann 
mischerbig und ergeben, wenn Sie un¬ 
tereinander gekreuzt werden, zu je 25 
Prozent reinerbige Blumen in jeweils 
Rot und Weiß sowie 50 Prozent wieder¬ 
um spalterbige rosa Blüten. Dies nennt 
man den intermediären Erbgang. 

Doch es gibt auch andere Möglichkei¬ 
ten der Vererbung. Danach vererbt eine 
Farbe dominant, die andere rezessiv. In 
der Tochtergeneration erscheint dann 
nur die dominante Farbe. Die rezessive 
Farbe ist aber nicht verloren, sondern 
kann durch Kreuzung mit Blüten, die 
diese Farbe dominant oder rezessiv tra¬ 
gen, wieder zum Vorschein kommen. 
Das Gesagte gilt natürlich nicht nur für 
Farben, sondern auch für andere Merk¬ 
male, wie Blutenformen, Tierbehaa¬ 
rung und so weiter. 

Vererbung ohne Zwang 

Eine weitere Regel besagt, daß alle Erb¬ 
merkmale unabhängig voneinander 
vererbt werden. So kann also eine Blüte 
in der Farbe reinerbig, in der Form der 
Blätter aber spalterbig oder mischerbig 
sein. Dies ist möglich, da die Erbmerk¬ 


male in verschiedenen Genen verankert 
sind. Außerdem ist jedes Gen doppelt 
vorhanden. So ist auch die Spalterbig¬ 
keiterklärt: Tragen beide Gene die glei¬ 
chen Erbfaktoren, ist die PHanze rein¬ 
erbig, ansonsten spalterbig oder inter¬ 
mediär. Es ist sogar möglich, daß ein 
Merkmal reinerbig, ein anderes dage¬ 
gen spalterbig ist. 

Blumenzüchter 
wider Willen? 

Das Programm Blumen versetzt Sie in 
die Rolle eines Blumenzüchters. Wahl¬ 
weise kann das Programm allein oder 
miteinem Mitspieler gespielt werden. 
Am Anfang stehen Ihnen lediglich drei 
verschiedene Blüten zur Verfügung. 
Diese drei bleiben immer bis zum Ende 
des Spiels oben in der Mitte stehen und 
können jederzeit zur Zucht verwendet 
werden. Jeder Züchter kann nun jeweils 
drei Kreuzungen vornehmen. Zuerst 
entnimmt er einer Blüte etwas Blüten¬ 
staub, den er dann einer anderen, später 
auch der gleichen Blüte auf den Stem¬ 
pel überträgt. Dies geschieht, indem die 
unter jeder Blüte angezeigten zwei Zif¬ 
fern eingegeben werden. 

Die obersten drei Blüten sind in jedem 
Falle reinerbig. Sie zeigen die drei 
möglichen Blüienformen sowie die 


zwei Farben. Zwei von ihnen, die aber 
in jedem Spiel wechseln, haben auch 
noch Gene für gemusterte Blülcnkörb- 
chen. Dies ist jedoch nicht zu erkennen, 
da das Muster die gleiche Farbe hat wie 
das Körbchen selbst. Auch das Körb¬ 
chen hat ja die gleiche Farbe wie die 
Blütenblälter. 

Ziel ist es, die verschiedenen Farben 
und Muster zu züchten, die auf der 
rechten Bildseite angezeigt werden. Es 
gibt insgesamt 36 verschiedene B lüten. 
von denen drei bereits zu Anfang vor¬ 
handen sind. Die restlichen 33 sollen 
erst noch erschaffen werden. 

Bewertung tut not 

Unter den Blüten der rechten Seite ste¬ 
hen Zahlen. Hierbei handelt es sich um 
Punkte, die an denjenigen gehen, der 
als ersterdiese Züchtung erreicht. 

Jede gezüchtete Blüte, gleich, ob neu 
oder schon vorhanden, erscheint sofort 
nach der Kreuzung oben rechts. Bei einer 
Neuzüchiung erscheint zusätzlich noch 
die Punktzahl unter der Blüte. Die Punk¬ 
te setzen sich aus den rechts angezcigten 
Punkten sowie einem Bonus zusammen, 
der sich aus der angezeigten Punktzahl 
minus der Anzahl gespielter Runden er¬ 
rechnet. Es gibt also mehr Punkte, je eher 
einer neue Form erscheint. 
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Hat der Spieler seine drei Züchlungen 
absolviert, werden ihm die Punkte gui- 
geschrieben. Darauf werden die Neu¬ 
züchtungen in sein Feld links unten 
übernommen und stehen in der näch¬ 
sten Runde zurZuchl bereit. 

Wie man leicht erkennt, faßt das linke 
Feld nur 36 Blüten. Ab der 13. Runde 
hätten also keine weiteren Blüten Platz. 
Darum werden die sechs ältesten Blü¬ 
ten in derersten Reihe entfernt, undalle 
anderen rücken eine Reihe höher. 

Fairneß auch beim 
Blumenzuchten 

Da bei zwei Spielern der zweite im 
Nachteil ist, falls schon in der ersten 
Runde Neuzüchtungen anfallen, wer¬ 
den in dieser Runde keine Punkte ver¬ 
geben. 

Wie oben bereits angedeutet, ist es auch 
möglich, eine Blüte mit eigenem Sa¬ 
men zu bestäuben. Dazu wird einfach 
die Platzzahl der betreffenden Blüte 
zweimal eingegeben. Das hat natürlich 
nur Sinn, wenn die Blüte spalterbig ist, 
mit dem Ziel, rezessive Eigenschaften 
herauszuzüchten. 

Jede Blüte hat in diesem Spiel zwei Sät¬ 
ze Chromosomen mit je fünf Genen, ln 
der Natur sind e.s mehr, aber hier soll es 
damit genug sein. Ein Gen bestimmt die 
Blütenform, ein anderes deren Farbe. 
Das dritte ist für die Farbe de.s Blü¬ 
tenkörbchens zuständig. Die restlichen 
zwei bestimmen das Körbchenmuster 
sowie de.ssen Farbe. 

Bei der Zucht wird nun bei Jedem Gen 
per Zufall be.stimmt, welches der bei¬ 
den für eine neue Pflanze genommen 


wird. Treffen in der neuen Pflanze nun 
gleiche Gene zusammen, ist der Fall 
klar, ansonsten wird das Aussehen der 
Pflanze nach den Erbregeln bestimmt. 
So ist die helle Farbe dominant gegen 
die dunkle. Die runde Blülenform do¬ 
miniert gegen die beiden anderen, die 
spitze Form tritt hinter der herzförmi¬ 
gen zurück. Milden Körbchen ist es so, 
daßdie Anlage für“kein Muster’‘domi- 
nant ist. Ein Körbchen ist nur dann 
sichtbar, wenn es die Anlage für ein 
Muster in beiden Genen hat und wenn 
seine Musterfarbe von der Farbe des 
Körbchens abweichi. So ist es wesent¬ 
lich schwieriger, dunkle Farben zu 
züchten und außerdem das rezessive 


Körbchen sichtbar zu machen. Daraus 
resultieren auch die unterschiedlichen 
Punktwerte. 

Das Spiel ist zu Ende, wenn die letzte 
mögliche Blüte herausgezüchtet ist. 
Wem das zu lange dauert, der kann das 
Programm Jederzeit mit <F8> abbre¬ 
chen. 

Um die Blütenformen zu zeigen, ist es 
notwendig, den vom System vorgege¬ 
benen Zeichensatz des Joyce teilweise 
zu ändern. Dies dauert ein paar Sekun¬ 
den. Darum wird zuerst eine Blüte auf 
dem Bildschirm angezeigt und gefragt, 
ob diese Umdefinition vorgenommen 
werden soll. 

Günter Kramer/rs 


<18> 

100 

' Blumen 

<20> 

110 

' Joyce/PCW 8256/8512/9512 

<22> 

120 

' (c) 1992 G}nter Kramer 

<50> 

130 


<26> 

140 


<10> 

150 

GOSUB 3520 

<73> 

160 

GOSÜB 3930 

<65> 

170 

GOSUB 3650 

<32> 

180 

GOSUB 2450 

<72> 

190 

GOSUB 3380 

< 1> 

200 

GOSUB 2710 

<98> 

210 

GOSUB 260 

<69> 

220 

PRINT cur.eins:END 

<34> 

230 

REM -=- 

<ai> 

240 

REM === Anfang === 

<38> 

250 

REM ============== 

<95> 

260 

spie=0:runde=l 

<80> 

270 

Zucht(0,0,1)=0:Zucht(0,o,2)=0 

< 5> 

280 

neumus=33 

<68> 

290 

spie=spie+i 

<84> 

300 

IF spie>anz THEN spie=l:runde=runde+i 

<74> 

310 

IF anz=l THEN 460 

<36> 

320 

FOR za=6 TO 29 

< 9> 

330 

PRINT FNcursor$(za,0)SPACES(41) 

<44> 

340 

NEXT 


<42> 

350 

zei=i 

<33> 

360 

FOR zeil=6 TO 26 STEP 4 

<89> 

370 

FOR spal=0 TO 35 STEP 7 

<56> 

380 

IF 2ei>zucht(0,0,spie) THEN 440 
blu= 2 ucht(spie,zei, 2 ) 

<97> 

390 

<82> 

400 

GOSUB 2150 

<77> 

410 PRINT FNcursor$(zeil+3,spal+2)USING 

10*((zeil-2)/4)+i+spal/7 

<52> 

420 

zei=zei+i 

<86> 

430 

GOTO 450 

<39> 

440 

zeil=26:spal»35 

< 8> 

450 

NEXT spal,zeil 

<84> 

460 

PRINT FNcursorS{5,20)runde". Runde" 

<41> 

470 

a$=invers$ 

<13> 

480 

GOSUB 2070 

< 7> 

490 

IF INKEY$<>"" THEN 490 

<49> 

500 

neu =0 

<76> 

510 

kreuz =0 

<37> 

520 

bluet=l 

<14> 

530 

zeil =0 

<31> 

540 PRINT FNcursorS(0,20)invers$;neu+l". Kreu 
zung" 

< 6> 

550 

PRINT FNcursorS (l,20)kreuz+l'’. Bitte.. " 

<57> 

560 

PRINT FNcursorS(2,20)" Reihe =. "zeil 

PRINT FNcursorS(3,20)" Spalte =. ? "norina 

<40> 

570 
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IS 

<55> 580 a$=INKEY$ 


G "##";neuinus 
<58> 1420 GOSUB 2000 

<89> 590 IF (a$>V") ÄND (aS<"7") THEN 700 


<95> 1430 IF punk>runde THEN punk=punk+punk-runde 

<15> 600 IF a$=CHRS(16) THEN 1180 


<81> 1440 IF runde=l THEN punk=0 

<45> 610 FOR za*0 TO 100:NEXT 


<30> 1450 zb=blu(blu,0) 

<71> 620 zb=3:IF bluet=l THEN 2b=2 


<57> 1460 zc=blu(blu,l) 

<51> 630 PRINT FNcursor$(2b,31)''?" 


<97> 1470 FOR za=zb TO zb+3 

<48> 640 aS=INKEYS 


<84> 1480 PRINT FNcursor$(za,ZC)SPACES(6) 

<82> 650 IF (aS>V") AND (a$<"7") THEN 700 


<i8> 1490 NEXT 

<27> 660 IF aS=CHRS(16) THEN 1180 


<40> 1500 PRINT FNcursorS(zeil+3,spal)USING "###«" 

<57> 670 FOR za=0 TO 100:NEXT 

<95> 680 PRINT FNcursorS(zb,31 )invers$"?"norinal$ 


;punk 

<35> 1510 punkt=punkt+punk 

<64> 690 GOTO 580 


<44> 1520 GOSUB 2150 

<96> 700 IF bluet=2 THEN 760 


<97> 1530 RETURN 

<44> 710 zeil=VAL(aS) 


<56> 1540 REM ==================»==«==» 

<38> 720 IF zeil>((zucht(0,0,spie)+3)/6) THEN 580 


< 8> 1550 REM *«= Neuzucht einf}gen 

<26> 730 PRINT FNcursorS (3,30 )invers$zeil ;norinalS 


<62> 1560 REM ========================= 

<54> 740 bluet=2 


< 1> 1570 zei=zucht(0,0,spie) 

<92> 750 GOTO 540 


< 9> 1580 IF zei=36 THEN GOSUB 1760 

<29> 760 spal=VAL(a$) 


<61> 1590 FOR za=0 TO 2 

<Ba> 770 IF spal=0 THEN 580 


<47> 1600 FOR Zb=0 TO 2 

<14> 780 IF Upal<4) AND (zeil=0) THEN 850 


< 2 a> 1610 zucht(spie,zei+za+l,zb)=neu(za, 2 b) 

<30> 790 IF zeil=0 THEN 580 


< 1> 1620 NEXT 

<90> 800 2 ei=spal+ 6 *(zeil-1) 

<18> 810 IF zei>zucht( 0 , 0 ,spie) THEN 580 
<53> 820 gen.a!=zucht(Spie,zeijO) 


<92> 1630 zeil=4*INT((zei+za)/6)+6 


<49> 1640 spal=7*(zei+za-6*INT{{zei+za)/6)) 


<19> 1650 blu=neu(za,2) 

<90> 830 gen.b= 2 ucht(spie,zei,l) 


< 16 > 1660 2 =za 

<55> 840 GOTO 870 


<61> 1670 GOeUB 2150 

<17> 850 gen.a=grund(spal-1,0) 


<ii> 1680 za=z 

<S2> 860 aen.b!=qrund(spal-l,l) 


<67> 1690 PRINT FNcursorS(zeil+3,spal+2)USING "##" 

< 7> 870 a$=RIGHTS(STRS(zeil),l)+RIGHTS(STRS(spal) 

/l) 

<37> 880 PRINT FNcursorS(kreuz*2,58+ii*neu)aS 


;10*((zeil-2)/4)+l+spal/7 
<20> 1700 NEXT 

< 4> 1710 zucht(0,0,spie)=2ucht{0,0,spie)+3 

<85> 890 gen=qen.a AND 3 


<98> 1720 RETURN 

<52> 900 IF (RND(1)*2)>1 THEN gen=gen.b AND 3 


<57> 1730 REM ====================== 

<54> 910 za=gen.a AND 96:IF {2*RND(0))<1 THEN za=g 


<24> 1740 REM === Platz schaffen === 

en.b AND 96 
<10> 920 gen=gen+za 


<63> 1750 REM ====================== 

<44> 1760 FOR za=6 TO 8 

<83> 930 2a=INT(RND(l)*32) AND 28 


<77> 1770 PRINT FNcursorS(za,0)SPACE$(42) 

<76> 940 zb=gen.a AND za 


<21> 1780 NEXT 

<45> 950 gen=gen OR zb 


<12> 1790 FOR 2a=7 TO 36 

<49> 960 zb=gen.b AND 28-za 


<39> 1800 zc=za-6 

<49> 970 gen=gen OR zb 


<54> 1810 FOR 2b=0 TO 2 

<34> 980 neu(neu,kreuz)=gen 


<49> 1820 zucht(spie, 2 c,zb)= 2 ucht(spie,za, 2 b) 

<26> 990 IF kreuz=0 THEN kreuz»l:GOTO 520 


< 8> 1830 NEXT 

<57> 1000 GOSUB 1270 


<11> 1840 ZC=ZC-1 

<45> 1010 IF neuinus<l THEN 1040 


<14> 1850 zeil=4*INT(zc/6)+6 

<43> 1020 neu=neu+l 


< 6> 1860 Spal=7*(ZC-6*INT{ZC/6)) 

<52> 1030 IF neu<3 THEN 510 


<18> 1870 blu=zucht(spie,za,2) 

<62> 1040 IF punkt=0 THEN 1110 


<26> 1600 z=za 

<S5> 1050 FOR za=l TO 10 


<71> 1890 GOSUB 2150 

<8a> 1060 PRINT homeSCHRS(7) 


<81> 1900 FOR zb=zeil+4 TO zeil+6 

< 4> 1070 NEXT 


<25> 1910 PRINT FNcursorS(zb,spal)SPACES(6) 

< 3> 1080 zucht(0,l,spie)=2ucht(0,l,spie)+punkt 


< 7> 1920 NEXT 

<15> 1090 PRINT FNcursorS(2,(spie-l)*10)inversSUSI 


< 2> 1930 za=z 

NG •'#########";zucht(0,1,spie) 

<48> 1100 punkt=0 


<13> 1940 NEXT 

<34> 1950 zei=30:zucht(0,0,spie)=30 

<41> 1110 a$=normalS:PRINT aS 


<15> 1960 RETURN 

< 5> 1120 GOSUB 1570 


< 3> 1970 REM ================= 

<54> 1130 GOSUB 2070 


<18> 1980 REM === Punktwerte === 

<56> 1140 FOR za=0 TO 3 


< 9> 1990 REM ======*«==«=»===== 

<15> 1150 PRINT FNcursorS(za,58)SPACES(31) 


<36> 2000 punk=3+(blu AND 3)+(2+(blU AND 4)/2) 

< 3> 1160 NEXT 


<50> 2010 punk=punk+3+(blu AND 8)/4 

<59> 1170 IF neumus>0 THEN 290 


<12> 2020 punk=(((blu AND 16)/4)+3+(blu AND 96)/4) 

< 6> 1180 PRINT FNcursorS(0,42)". " 

<17> 1190 PRINT FNcursorS(1,42)" Ende " 


*punk 

<8e> 2030 RETURN 

<28> 1200 PRINT FNcursorS(2,42)". " 


<19> 2040 REM ======================= 

<66> 1210 IF INKEYSo’"' THEN 1210 


■<12> 2050 REM === Punkte ausgeben === 

<71> 1220 IF INKEYS="" THEN 1220 


<25> 2060 REM ======================= 

<91> 1230 RETURN 


< 0> 2070 PRINT FNcursor$(0,(spie-l}*10)a$"Zlchter 

<40> 1240 REM ==:=;==«================ 

<77> 1250 REM === Zuchtergebnis === 


"USING "##";spie 

<23> 2080 PRINT FNcursorS(1,(spie-1)*10)SPACES(9) 

<46> 1260 REM ======:==========««==== 


<85> 2090PRINT FNcursorSU.(spie-1)*10)USING "### 

<19> 1270 gen.a»neu(neu,0) 

<52> 1280 gen.b«neu(neu,1) 


######"; 2 ucht( 0 ,l,spie) 

<10> 2100 PRINT FNcursorS(3,(spie-1)*10)SPACES(9)n 

<55> 1290 gen=gen.a AND 28 
<14> 1300 gen=gen.b AND gen 


ormalS 

<84> 2110 RETURN 

<11> 1310 za=qen.a AND 3 


<43> 2120 REM ====================== 

<49> 1320 IF za>(gen.b AND 3) THEN za=gen.b AND 3 


<59> 2130 REM === Bl)te ausgeben === 

< 0> 1330 gen=gen+za 


•<49> 2140 REM ====================== 

<26> 1340 za=qen.a AND 96 


<76> 2150 adr=2*(blu AND 3)+(blu AND 4)/4 

<75> 1350 IF za>(gen.b and 96) THEN za=gen.b AND 9 


<37> 2160 adr=i29+18*adr 

6 

<a4> 1360 blu=gen+za 


<11> 2170 korb=INT(blu/32) 

^24> 2180 adrk=(blu AND 12)/4 

< 9> 1370 GOSUB 3270 


<81> 2190 IF adrk=0 THEN adrk=137 

< 3> 1380 neu(neu,2)=blu 


<64> 2200 IF adrk=l THEN adrk=191 

<58> 1390 zeil=0:spal=61+ll*neu 


<83> 2210 IF adrk=2 THEN adrk=173 

<10> 1400 IF neu.mus*=0 THEN 1520 


< 3> 2220 IF adrk=3 THEN adrk=l55 

<44> 1410 PRINT FNcursor$(5,50)"neue Muster: "ÜSIN 


<G5> 2230 IF blU<32 THEN 2340 
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<90> 2240 IF (blU AND 8)=((blu AND 16)/2) THEN 234 


<37> 3050 blu=grund(za,2) 

0 


< 2> 3060 GOSUB 3270 

<30> 2250 adrk=blu AND 116 


< 6> 3070 NEXT 

<91> 2260 IF aclrk=48 THEN adrk=209 


<16> 3080 blu=0 

<16> 2270 IF adrk=32 THEN adrk=237 


<67> 3090 FOR zeil=6 TO 26 STEP 4 

< 6> 2280 IF adrk=52 THEN adrk*239 


<52> 3100 FOR spal=47 TO 82 STEP 7 

<54> 2290 IF adrk=36 THEN adrk«227 


<16> 3110 IF blu>94 THEN 3200 

<89> 2300 IF adrk=80 THEN adrk=24l 


<16> 3120 IF (blu ={a AND 15)) OR {blu=(b ÄND 15)) 

<42> 2310 IF adrk=-64 THEN adrk=245 


OR (blu={c AND 15)) THEN 3210 

<47> 2320 IF adrk=68 THEN adrk=243 


<92> 3130 IF blu$(blu)<>"l" THEN blu=blu+l:GOTO 31 

<35> 2330 IF adrk=B4 THEN adrk=247 


10 

<62> 2340 IF (adrk<137) OR (adr>247) THEN 2410 


<44> 3140 GOSUB 2150 

<46> 2350 FOR za=0 TO 2 


<63> 3150 GOSUB 2000 

<15> 2360 FOR zb=0 TO 5 


<58> 3160 PRINT FNcursorS(zeil+3,spal)USING "##### 

<69> 2370 IF (za=l) AND (zb=2) THEN 2b=4 


#";punk 

<69> 2380 PRINT FNcursorS(zeil+za , spal+zb)CHR$(adr 


<39> 3170 blu(blu,o)=zeil 

4-zb+6*za) 


<82> 3180 blu(blu,i)=spal 

<56> 2390 NEXT zb,za 


<82> 3190 GOTO 3210 

<58> 2400 PRINT FNcursorS(zeil+1,spal+2)CHRS(adrk) 


<64> 3200 zeil=26:spals82 

CHRS(adrk+l) 


<79> 3210 blu=blu+l 

<90> 2410 RETURN 


< 9> 3220 NEXT spal,zeil 

<76> 2420 REM =====*««*=== 


<93> 3230 RETURN 

<64> 2430 REM ==* Titel =— 



<82> 2440 REM ““==»*-*=====- 


<73> 3250 REM === Neuzucht pr}fen === 

<16> 2450 PRINT clear$ 


<30> 3260 REM =======*=:=:============= 

<46> 2460 FOR zeil=0 TO 6 STEP 3 


<93> 3270 neu.mussO 

<66> 2470 FOR spal=36 TO 48 STEP 6 


<38> 3280 IF ((blu AND 8)=((blu AND 16)/2)) AND (b 

<22> 2480 IF (zeil=3) AND (spal=42) THEN spal=48 


lu>31) THEN blu=blu AND 15 

< 0> 2490 blu=INT(RND(l)*3)+4‘INT(RND(l)*8)+32*INT 


< 7> 3290 IF blu<32 THEN blu^^blu AND 15 

(RND{1)*3) 


<36> 3300 IF blu$(blu)<>"l" THEN 3340 

<39> 2500 GOSUB 2150 


<64> 3310 blu$(blu)="" 

<11> 2510 NEXT Spal,zeil 


<94> 3320 neu.raus=l 

<69> 2520 PRINT FNcursorS(4,42)"Blumen" 


<41> 3330 neumus=neumus-l 

< 5> 2530 aS=CHRS(247)+CHRS{248) 


<98> 3340 RETURN 

< 28 > 2540 aaS=aS+aS:aa$=aa$+aa$+aa$+aa$+aa$ 


<56> 3350 REM =============*=»»*============ 

<30> 2550 PRINT FNcursor$(10,35)aa$ 


<10> 3360 REM =*= Variable + Dimensionen =«== 

<87> 2560 PRINT FNcursorS(11,35)aSSPC(16)a$ 


<62> 3370 REM ======*========*=======:======= 

<7l> 2570 PRINT FNcursorS(12,35)aS"ein Programm vo 


<10> 3380 DIM bluS(94),blu(94,l) 

n"aS 


<69> 3390 DIM grund(2,2),neu(2,2) 

<40> 2580 PRINT FNcursorS(13,35)aSSPC(16)aS 


<31> 3400 DIM 2UChtUf36»2) 

<47> 2590 PRINT FNcursorS 14,35)a$" ointer. Kramer 


<62> 3410 FOR za=0 TO 94 

"aS 


<77> 3420 2 b=za 

<64> 2600 PRINT FNcursorS(15,35)aSSPC(16)aS 


<78> 3430 IF (za AND 3)=3 THEN 3470 

<59> 2610 PRINT FNcursorS(16,35)aaS 


<86> 3440 IF ((za AND 8)«((za AND 16)/2)) AND (za> 

<61> 2620 PRINT:PRINT:PRINT 


31) THEN 2b=za AND 15 

<64> 2630 PRINT "Wieviele Spieler? (l oder 2)" 


<37> 3450 IF za<32 THEN zb=za AND 15 

< 7> 2640 a$=lNKEYS 


<45> 3460 blu$(zb)="l" 

<51> 2650 IF (aS<"l") OR (aS>'’2") THEN 2640 


<14> 3470 NEXT 

< 2> 2660 an2=VAL(a$) 


<13> 3480 RETURN 

<13> 2670 RETURN 


<13> 3490 REM ====*======■======:==:= 

<61> 2680 REM ===«»===============*= 


<57> 3500 REM === definitionen === 

<39> 2700 REM ===a«=r===== === ===«»a» 


<13> 3520 escape$=CHRS(27) 

<10> 2710 PRINT clearS 


<22> 3530 hone$=escape$+"H" 

<71> 2720 a=28*INT{RND(l)*2) 


<75> 3540 clear$=escapeS+"E"+horaeS 

<14> 2730 b=l+28*INT(RND(l)*2) 


<45> 3550 Cursor.rechts$=escapeS+"C" 

<31> 2740 C=2+28*INT(RND(1)*2) 


< 2 > 3560 DEF FNcursorS(zeile,spalte)=escapeS+"Y"+ 

<35> 2750 IF (a+b)=57 THEN c=2 


CHRS(32+zeile)+CHRS(32+spalte) 

<42> 2760 IF (a+b)=l THEN C=30 


<65> 3570 invers$=escape$+"p" 

<60> 2770 FOR za=0 TO 2 


<20> 3580 DormalS=escapeS+"q" 

<45> 2780 grund(0,za)=a 


<67> 3590 cur.einS=escapeS+"e" 

<7a> 2790 grund(l,za)=b 


< 20 > 3600 cur.ausS=escapeS+"f" 

<83> 2800 grund(2,za)=c 


< 4> 3610 PRINT clearScur.ausS 




< 8> 2820 za=iNT(RND(l)*3) 


<44> 3630 REM === uhrzeit holen === 




<S7> 2840 IF za=zb THEN 2830 


<26> 3650 zeit2=HIMEM 

<78> 2850 FOR ZC-0 TO 2 


<82> 3660 zeitl=zeit2-4 

<3l> 2860 grund(za,zc)=grund(za,zc)+32 


<62> 3670 zeit=2eit2-16 

<37> 2870 grund(zb,zc)=grund(zb,zc)+64 


<45> 3680 MEMORY zeit-i 

<24> 2880 NEXT 


<56> 3690 RESTORE 3870 

<86> 2890 FOR 2a=0 TO 3 


<72> 3700 FOR i = zeit TO zeit+11 

< 2> 2900 PRINT FNcursorS(za,33)CHR$(135)SPC(22)CH 


<62> 3710 READ zeit$ 

RS(140) 


<90> 3720 a=VAL("&H"+zeitS) 

< 5> 2910 NEXT 


< 2> 3730 POKE i,a:NEXT 

<52> 2920 PRINT STRINGS(90,179) 


<82> 3740 POKE 2eit+3,Zeitl-256*INT(zeitl/256) 

< 9> 2930 zeil=o 


<82> 3750 POKE zeit+4,INT(2eitl/256) 

<77> 2940 FOR ZC=0 TO 2 


<44> 3760 POKE zeit+9,zeit2-256*INT(z6it2/2561 

<12> 2950 spal=35+7*ZC 


<59> 3770 POKE zeit+lO,INT(zeit2/256) 

<91> 2960 blu=grund{ZC,2) 


<80> 3780 CALL zeit 

<68> 2970 GOSUB 2150 


<54> 3790 Std=PEEK(Zeit+14) 

<24> 2980 PRINT FNcursorS(3,Spal+2)"0"ÜSING "#";zc 


<15> 3800 minu=PEEK(ZBit+15) 

+1 


<25> 3810 sek=PEEK(zeit+16) 

<29> 2990 NEXT 


<54> 3820 StdS= CHR$(48+INT(std/16))+CHRS(48+(std 

<85> 3000 FOR za=5 TO 29 


AND 15)) 

<53> 3010 PRINT FNcursorS(za,44)CHR$(237)CHR$(238) 


<71> 3830 zei=0 

<90> 3020 NEXT 


<3i> 3840 min$= CHRS(48+iNT(minu/i6))+CHRS(48+(min 

<97> 3030 PRINT homeS 


u AND 15)) 

<3B> 3040 FOR za=0 TO 2 


<78> 3850 sek$= CHR$(48+INT{sek/16))+CHR$(48+(sek 
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AND 15)) 

<45> 3860 RANDOMIZE sek+ininu+std 


<82> 4720 REM === aufbereiten Zeichen === 

<35> 4730 REM =========================== 

<12> 3870 DATA Oe,69,11,ff,ff,cd,05,00,32,ff,ff,c9 


< 3> 4740 FOR za=2Z+zei TO zz+zei-2 STEP -1 

< 5> 3880 MEMORY HIMEM+17 


<58> 4750 FOR 2b=0 TO 7 

<24> 3890 RETURN 


<28> 4760 a=zeich(zh,zb) 

<11> 3900 REM ========================«:« 


< 8> 4770 aa=0:IF a=0 THEN 4810 

<64> 3910 REM === Zeichensatz {ndern === 


<78> 4780 FOR ZC=0 TO 7 

<17> 3920 REM =======«======*============ 


< 8> 4790 IF (a AND 2''zc)>0 THEN aa=aa+2''(7-zc) 

<14> 3930 zeilc0:spal=0:blu=84 


< 2> 4800 NEXT 

<60> 3940 GOSÜB 2150 


<17> 4810 Z=zb 

<41> 3950 PRINT FNcursorS(1,10)"Zeichensatz laden? 


<71> 4820 IF zz=146 THEN z=7-zb 

(j/n)" 

<20> 3960 a$=INKEYS 


<66> 4830 POKE code+z,aa 
<17> 4840 zei{z)=aa 

<74> 3970 IF a$="n" THEN 4540 


<17> 4850 NEXT 

<3a> 3980 IF aSo^j" THEN 3960 


<84> 4860 GOSÜB 4580 

<31> 3990 PRINT FNcursorS(2,10)"Bitte etwas Geduld 


<86> 4870 zh=zh+l 

1" 

<86> 4000 zeisa=HIMEM-30 


<26> 4880 NEXT 
<25> 4890 RETURN 

<98> 4010 MEMORY zeisa 


<30> 4900 REM-=-=====*========== 

<33> 4020 RESTORE 4080 


<44> 4910 REM === verarbeiten Zeichen === 

<93> 4030 zeisa=zeisa+l 


<36> 4920 REM =========================== 

<10> 4040 FOR za=zeisa TO 2 eisa +20 


<27> 4930 zh=0:FOR za=l29+zei TO 137+zei 

<49> 4050 READ COde$ 


<24> 4940 IF za=132+zei THEN za^za+S 

<82> 4060 POKE za,VAL<"&H"+code$) 


<62> 4950 FOR zb=0 TO 7 

< 7> 4070 NEXT 


<50> 4960 POKE code+zb,zeich(zh, 2 b) 

< 9> 4080 DATA 01,ff,ff,cd,5a,fc,e9,00,C9 


<79> 4970 zei(zb)=zeich(zh,zb) 

<25> 4090 DATA 21 , ff , ff , 01 , 08,00,11 ,ff, ff 


<28> 4980 NEXT 

<89> 4100 DATf ed,b0,C9 


<95> 4990 GOGUB 4580 

<11> 4110 code=2eisa+9 


<50> 5000 zh=zh+l 

<65> 4120 POKE zeisa+1,code-256*INT(code/256) 


<89> 5010 NEXT 

<54> 4130 POKE zeisa+2,lNT(code/256) 


<88> 5020 zh=0:FOR za=l41+zei TO 143+zei 

<90> 4140 code=zeisa+2l 


<39> 5030 FOR zb=0 TO 7 

<93> 4150 POKE zeisa+10,code-256*INT(code/256) 


<48> 5040 POKE code+7-zb,zeich(2h,2b) 

<22> 4160 POKE zeisa+11,INT(code/256} 


<52> 5050 2ei(zb}=zeich{zh,7-zb) 

<14> 4170 RESTORE 5230 


< 5> 5060 NEXT 

<63> 4180 GOSÜB 4500 


<72> 5070 GOSÜB 4580 

<29> 4190 zei=0:GOSÜB 4930 


<74> 5080 Zh*=zh+1 

< 0> 4200 2eil=10:spal=30:blu*0 


<14> 5090 NEXT 

<38> 4210 GOSÜB 2150 


< 2> 5100 zh=0:zz=134:GOSUB 4740 

<20> 4220 zeil=15:blu*l2 


<82> 5110 Zh=3:zZ=140:GOSUB 4740 

<44> 4230 GOSÜB 2150 


<55> 5120 zh=0;2Z=146:GOSUB 4740 

< 4> 4240 RESTORE 5290 


<93> 5130 RETURN 

<56> 4250 GOSÜB 4500 


< 7> 5140 REM ==-===========- 

<41> 4260 Zei=36;GOSUB 4930 


<98> 5150 REM === Bl}tenmitte === 

<68> 4270 zeil=10:spal=36:blu=l 


<13> 5160 REM =================== 

<S9> 4280 GOSÜB 2150 


<53> 5170 FOR zb=0 TO 7 

<60> 4290 zeil=15:blu=13 


< 7> 5180 READ a 

<37> 4300 GOSÜB 2150 


<35> 5190 POKE code+zb,a 

<47> 4310 RESTORE 5350 


<90> 5200 NEXT 

<49> 4320 GOSÜB 4500 


<58> 5210 GOSÜB 4580 

<30> 4330 zei=72:GOSUB 4930 


<92> 5220 RETURN 

<26> 4340 zeil=10:spal=42:blu=2 


<94> 5230 DATA 0,0,0,0,1,7,15,31 

<52> 4350 GOSÜB 2150 


<24> 5240 DATA 0,0,0,0,248,255,255,255 

<72> 4360 zeil=15:blU=14 


<30> 5250 DATA 7,63,127,255,255,63,159,207 

<5a> 4370 GOSÜB 2150 


<26> 5260 DATA 31,15,7,1,1,7,15,31 

<19> 4380 RESTORE 5410 


< 6> 5270 DATA 255,255,255,255,128,255,255,255 

<93> 4390 aS="N" 


<77> 5280 DATA 240,207,159,63,63,159,207,240 

<19> 4400 FOR za=173 TO 227 STEP 17 


<50> 5290 DATA 0,0,0,0,0,1,0,0 

< 7> 4410 GOSÜB 5170 


<14> 5300 DATA 0,0,0,0,248,255,255,255 

<43> 4420 za=za+l 


<60> 5310 DATA 0,28,127,255,255,63,159,207 

<13> 4430 GOSÜB 5170 


<96> 5320 DATA 7,15,7,1,1,7,15,15 

< 6> 4440 NEXT 


<95> 5330 DATA 255,255,255,255,128,255,255,255 

<38> 4450 FOR 2a=237 TO 248 


<91> 5340 DATA 240,192,128,0,0,128,192,240 

<22> 4460 GOSÜB 5170 


< 4> 5350 DATA 0,0,0,0,0,0,15,7 

<15> 4470 NEXT 


<86> 5360 DATA 0,0,0,0,2,63,255,255 

<94> 4480 MEMORY HIMEM+30 


< 5> 5370 DATA 1,3,15,63,255,63,159,207 

<17> 4490 RETURN 


<82> 5380 DATA 3,3,1,0,0,1,3,3 

<91> 4500 FOR za=0 TO 5 


<64> 5390 DATA 255,255,255,128,127,255,255,255 

<42> 4510 FOR zb=0 TO 7 


<81> 5400 DATA 240,192,128,0,0,128,192,240 

<56> 4620 READ zeich{za,zb) 


<15> 5410 DATA 240,197,149,21,21,149,197,240 

<44> 4530 NEXT zb.za 


<86> 5420 DATA 15,83,81,84,84,81,83,15. 

< 4> 4540 RETURN 


<77> 5430 DATA 80,79,31,63,63,31,79,80 

<62> 4550 REM ========================= 


< B> 5440 DATA 10,241,249,252,252,249,241,10 

<56> 4560 REM === speichern Zeichen === 


<53> 5450 DATA 240,207,152,62,62,152,207,240 

<68> 4570 REM ========================= 


< 3> 5460 DATA 15,243,25,124,124,25,243,15 

<61> 4580 a=8*za+&HB800+2^16 


<39> 5470 DATA 80,74,39,43,43,39,74,80 

<21> 4590 POKE zeisa+16,a-256*INT(a/256) 


<50> 5480 DATA 5,161,233,212,212,233,161,5 

<48> 4600 POKE zeisa+17,INT(a/256) 


<68> 5490 DATA 240,202,167,43,43,167,202,240 

<14> 4610 CALL zeisa 


<45> 5500 DATA 15,163,233,212,212,233,163,15 

<85> 4620 IF a$="N" THEN 4700 


<21> 5510 DATA 80,79,24,62,62,24,79,80 

<68> 4630 a=a+144 


<75> 5520 DATA 5,241,25,124,124,25,241,5 

< 8> 4640 POKE zeisa+16,a-256*INT(a/256) 


<63> 5530 DATA 240,207,158,51,51,158,207,240 

<63> 4650 POKE zeisa+17,INT(a/256) 


<55> 5540 DATA 15,243,121,204,204,121,243,15 

<70> 4660 FOR ZC=0 TO 7 


<73> 5550 DATA 80,73,21,45,45,21,73,80 

< 9> 4670 POKE code+ZC,zei(zc) AND 85 


< 4> 5560 DATA 5,161,169,116,116,169,161,5 

<22> 4680 NEXT 


<19> 5570 DATA 240,201,149,45,45,149,201,240 

<38> 4690 CALL zeisa 


<49> 5580 DATA 15,163,169,116,116,169,163,15 

<95> 4700 RETURN 


<18> 5590 DATA 80,79,30,51,51,30,79,80 

<29> 4710 REM =========================== 


<36> 5600 DATA 5,241,121,204,204,121,241,5 
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LOCODIR in BAS und PAS 

Das LocoScript-Verzeichnis aufs 
Papier gebracht 

Vielejoyce-Bcsilzerinnen und-Besitzer tun sich schwer mit dem Umstieg 
vom wohlvertrauten Miallard-BASIC zur höheren Programmiersprache 
Pascal. Die beiden hier vorgestellten Programme in BAvSIC und Turbo Pascal 
geben nützliche Hilfestellungen für Umsteiger und zeigen deutlich die Paral¬ 
lelen und Unterschiede der beiden Programmsprachen auf. Daß beide 
Programme auch noch nützliche Dienste tun, versteht sich dabei von selbst. 


Es soll ja auch äußerst korrekte Conipu- 
terfreaks geben. Gemeint sind jene 
PCWler. deren Disketten wohlgeord¬ 
net. mit System archiviert und über¬ 
sichtlich beschriftet sind. Schwierig 
wird es jedoch dann, wenn es darum 
geht, umfangreichere Inhaltsverzeich¬ 
nisse auf dem Diskettenlabel {Be¬ 
schriftungsfeld der Diskette) unterzu¬ 
bringen. Bis zu 255 Dateien können 
theoretisch auf einer 720-kByte-Dis- 
kette für das Laufwerk B gespeichert 
werden. 

Der gewissenhafte und ordnungslie¬ 
bende Programmierer druckt daher sei¬ 
ne Disketten-Direclories auf Papier 
und heftet diese ab, gut .sortiert und mit 
dem Diskettennamen oder einer Dis- 
kettennummer versehen. 

Von CP/M zu LocoScript 

So weit, .so gut, wenn es sich um CP/M- 
Disketten handelt. Schwierig wird es da 
schon bei den Listings der LocoScript- 
Dateien. Sowohl die unterschiedlichen 
User-Gruppen (unter LocoScript 
heißen diese bekanntlich gruppeü bis 
gruppe? - können jedoch auch umbe¬ 
nannt werden) als auch die Benutzung 
der sogenannten Trans-Dateien (User 8 
bis 15) lassen den Au.sdruck des In¬ 
haltsverzeichnisses mit dem CP/M-Be- 
fehl “DIR A:[USER=ALLr nicht sehr 
übersichtlich aussehen. Eine Hardcopy 
mittels <EXTRA> + <FrR> ist zwar 
übersichtlicher, zeigt jedoch bei um¬ 
fangreicheren Directories immer nur 
einen Teil der Dateien. Darüber hinaus 
benötigt ein direkter Bildschirmaus¬ 
druck ein Vielfaches der Zeit eines nor¬ 
malen Au.sdrucks, weil er im Grafik¬ 
moduserfolgt. DasinderCPC-Interna- 
tional l2/r91 vorgestellte Programm 
JOYCE-TOOLS hilft hier schon be¬ 
trächtlich weiter und bringt einen über¬ 
sichtlichen Directory-Ausdruck aller 
User-Gruppen. 


Aber noch mehr ist möglich, mehr In¬ 
formation .steckt ja von Hause aus in je¬ 
der LocoScript-Datei. “Das Beste am 
Joyce ist sein Textsystem’', diesen Satz 
hört man oft; und in der Tat, das Joyce- 
Textsystem bleibt auch im Vergleich 
mit den heutigen Textverarbeitungs¬ 
programmen der DOS-Generation 
durchaus konkurrenzfähig. So ist es 
nicht verwunderlich, daß viele Joyce- 
Besitzer/innen zwar heute auf einem 
IBM-kompatibIcn Rechner program¬ 
mieren und sich an farbigen Spielen er¬ 
freuen, jedoch den alten PCW einschal¬ 
ten, wenn es darum geht, einen Text zu 
schreiben. 


Eine Gef^enüherslel- 
lung der BASIC- luul 
Pascal-Funktionen 
zeigt, daß beide 
Programme fast iden¬ 
tisch aufgebaut sind 


Leider wird eine besondere Eigen¬ 
schaft der LocüScript-Textverarbei- 
tung eher selten benutzt. Durch sie war 
LocoScript aber schon bei seiner Kon¬ 
zeption den anderen Texiverarbei- 
lungsprogrammen um eine Nasenlänge 
voraus. Die Rede ist von der Möglich¬ 
keit, zu jeder Datei ein sogenanntes 
Text-Info anzulegen. Der Inhalt oder 
Zweck eines Schreibens kann in die.se 
90 Zeichen breite Rubrik eingegeben 
und zu einem späteren Zeitpunkt abge¬ 
fragt werden. 

Ganze 8 Zeichen 

Die von CP/M vorgegebene und auch 
für MS-DOS immer noch gültige Be¬ 
schränkung des Dateinamens auf acht 
plus drei Zeichen bringt jeden Pro¬ 
grammierer manchmal in Schwierig¬ 
keiten. Wir alle kennen doch diese Fra¬ 
gen: “Was stand eigentlich in der Datei 
ANFROIX.BRF?” oder “Welchen Da¬ 
teinamen habe ich dem Schreiben an 
Herrn X gegeben?“. 

Gott sei Dank bietet die LocoScripl- 
Version 2.xx die Möglichkeit, das Text- 
Info schon in der Di.sk-Verwaltungein- 
zuschenund sogar zu ändern. Wenn je¬ 
doch - wie bei LocoScript 1 - 


LOCODIR.BAS LOCODIR.PAS 


SUBRÖlillNE 

Voroinsteliung 

0380 • 0520 

Iluuptmeiiue 

0570 - 1070 

Daten einlesea 

1080 - 1680 

lofotext-Formatiening 

1690 - 2060 

Liste sortieren 

2070 - 2360 

laste drucken 

2370 - 2760 

Listen-Ueberschrirt A 

2770 • 2880 

Listen-Ueberschrift B 

2890 - 2940 

Liste unzeigeo 

2950 - 3140 

Bildschinn-Ueberschrifl 

3150- 3270 

Kommentar elngcben 

3280 - 3680 

Schoittstellen-Wahl 

3690 - 3980 

Weiler mit belieb. Toste 

3990 - 4040 

Ja/Nein 

4050 - 4100 

Rahmen zekhoen 

4110-4210 

Keine Loco-Dalei 

4220 - 4270 

Programm beenden 

4280 - 4350 

Fehlerbehandlung 

4360 - 4400 


PROCEDUR 

WrileXY(*,y.st) 

WrileClr(xI,yl,zI,5t) 

Ohn«Space(st) 

Strich(Laenge) 

DruckStrkhCl.aengc) 

RahmenZekhnen 

WeiterMilTaste 

JaNcin 

KeineLocoDatei 

ProgrammEnde 

SchnittslellenWahl 

KommentarEingehen 

InfoTcxtFormatiercn 

DatcnEinlesen 

lIserDireclory Lesen 

t.isteSortiereo 

LisleDmcken 

Listenliebe rschriflA 

ListeoUeberschriftB 

LisieAozeigen 

BildschirmCeberschrift 

Voreinstellungen 

iluuptmenue 
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zunächst die Dalei geöflncl werden 
muß. bevor der Text auf dem Bild¬ 
schirm in voller Länge erscheint und 
gelesen werden kann, dann wird auf die 
Eingabe eines Text-Infos verzichtet. 
Interessant wird diese Option erst dann, 
wenn es die Möglichkeit gäbe, Infor- 
malionen in Form eines Listings auszu¬ 
drucken. 

So würde man eine wirklich informati¬ 
ve Übersicht über seine Texte und 
Schriftstücke erhalten. 

Was das Herz begehrt 

Das Programm, das diese Anforderung 
erfüllt, gibt es bereits. LOCODIR wur¬ 
de es getauft, und zum schnellen Aufruf 
wurde die Kurzform LD.BAS und 
LD.PAS gewählt. Der Name des Pro¬ 
gramms gibt bereits Auskunft über sei¬ 
nen Zweck: Es listet unter CP/M das 
LocoScripl-Directory einschließlich 
der eingegebenen Text-Infos auf. Da¬ 
bei werden die Dateien nach der Grup¬ 
penzugehörigkeil geordnet und die so¬ 
genannten Trans-Dateien besonders 
gekennzeichnet beziehungsweise auf 
Wunsch ignoriert. Hinzu kommen noch 
Sortier-, Druck- und Kommentar-Op¬ 
tionen, die den Ausdruck den eigenen 
Wünschen entsprechend gestalten. 
Kenner des PCW-Soflwarc-Spektrums 
werden nun anmerken, daß es bereits 
ein kommerzielles Programm mit dem 
Namen SUPER-LINDEX gab, das ähn¬ 
liche Features halte. Doch LOCODIR 
bietet diesem gegenüber einige Vortei¬ 
le: Der Ausdruck ist übersichtlicher, 
das Programm läßlsich- daalsQuell- 
text vorhanden - individuell anpassen 
und ist natürlich erheblich preiswerter. 
Sie erhalten es entweder durch Abtip¬ 
pen der Listings oder durch Bezug der 
DATABOX zu diesem Heft. 

Neben der Zweckmäßigkeit und dem 
Einsatz von LOCODIR bezweckt die 
Veröffent I ichung des Programm-Li- 
slings noch ein weiteres. Es soll eine 
Programmierhilfe besonderer Art ge¬ 
leistet werden. Obwohl die Vorteile von 
'l'urbo Pa.scal allgemein bekannt sind, 
fällt der Umstieg von dem geliebten 
Mallard-BASIC auf Pascal vielen 
Computerbesilzern/inncn schwer. 
Häufig fehlt es einfach an praktischen 
Vergleichen zwischen beiden Program¬ 
miersprachen. um den Unterschied 
zwischen BASIC und Pascal deutlich 
zu machen. 

LOCODIR beweist, daß dieser Unter¬ 
schied eben nicht so groß ist. wie oft be¬ 
hauptet wird. 
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Demjenigen, der gerne auf eine höhere 
Programmiersprache umsteigen möch¬ 
te, soll geholfen werden. LOCODIR 
liegt also in BASIC und Pascal vor. wo¬ 
bei beide Programme hinsichtlich ihrer 
Funktion und der Darstellung auf dem 
Bildschirm nahezu identisch sind. Le¬ 
diglich beim Einlesen des Disketten- 
Directorys müssen programmspra- 
chenbedingl geringe Unterschiede in 
Kauf genommen werden. Ansonsten 
wurde das BASIC-Programm konse¬ 
quent in ein analoges Turbo-Pascal- 
Programm zu übertragen. Auch die Va¬ 
riablen und die Menüstrukturen wur¬ 
den angepaßt. Daß die Stringvariablen 
in BASICmiiDollarzeichcn (beispiels¬ 
weise “Cur.sorEinS") in Turbo Pascal 
dagegen ohne'(also “CursorEin”) be¬ 
nannt werden, ist eher trivial und bedarf 
keiner weiteren Erläuterung. 
Voraussetzung für eine solche Übertra¬ 
gung nach Turbo Pascal ist natürlich ein 
gut .strukturiertes BASIC-Programm. 
Ein unübersichtliches “Spaghctii-Pro- 
gramrn” mit vielen Vor- und Rück¬ 
sprüngen eignet sich für eine solche 
“Transformation” sicherlich nicht, 
gehört darüber hinaus auch nicht zu ei¬ 
nem guten Programmierstil., 
LOCODIR.BAS wurde also in viele 
Unterprogramme (Subroutinen) aufge¬ 
teilt, die dann vom Hauptmenü aufge¬ 
rufen werden. Salopp gesagt, BASIC 
wird von oben nach unten program¬ 
miert, Pascal von unten nach oben. 

Bei Turbo Pascal mü.ssen die Routinen 
(Prozeduren) im Lisling immer vor 
dem Jeweiligen Aufruf liegen. Mil an¬ 
deren Worten, jede Prozedur muß vor 
ihrem ersten Start im Programm bereits 
definiert sein, weil der Compiler (Über¬ 
setzer in den Maschinencode) andern¬ 
falls mit dem neu aufgetretenen Begriff 
nichts anzufangen weiß. Wird zum Bei¬ 


spiel im vorliegenden Programm im 
Hauptmenü der Punkt “ListeDrucken” 
aufgerufen, so muß die Prozedur “Li¬ 
steDrucken” zeiienmäßig vor dem 
Hauptmenü plaziert sein. Da BASIC 
mit einer Zeilennumerierung arbeitet, 
ist die Anordnung der Subroutinen 
schon vom Prinzip her beliebig. Nach 
dem Aufruf “GOSUB 777" springt BA¬ 
SIC zu dieser Zeilennuinmer, egal was 
sich dahinter verbirgt. Auch wenn die 
Lage der Subroutinen im BASIC-Pro¬ 
gramm beliebig ist, so hat cs sich doch 
eingebürgert, mit dem Hauptmenü an¬ 
zufangen und alle weiteren Routinen 
hinten an/uhängen. Wird ein weiteres 
Programm-Modul benötigt, so fügt der 
BASIC-Programmierer dieses meist 
auch hinten an. 

Von BASIC nach Pascal 

Gerade um den Unterschied in der Pla¬ 
zierung zu zeigen, wurden beide Li¬ 
stings in der vorliegenden Form er¬ 
stellt. Sic werden jedoch diese Über- 
kreuz-Parallelen schnell feststellen 
und nachvollziehen können. Die ersten 
fünf Prozeduren sind bei Pascal zusätz¬ 
lich vorhanden. Sie entsprechen einzel¬ 
nen Programmzeilen in BASIC. So ist 
die Pascal-Prozedur “WnteXY(x,y,st)” 
identisch mit dem BASIC-Befehl 
“PRINT FNGotoXY$(x,y};st$;" und 
die Prozedur “Strich(Lacnge)” mit dem 
BASIC-Befehl “PRINT STRINGS 
(89.”-”)”. Pascal erscheint vielleichtet- 
was umständlicher, bietet jedoch - 
und das werden die Umsteiger bald 
merken- erheblich mehr Flexibilität. 
Weitere Vorzüge von Pascal sind seine 
hohe Geschwindigkeit und die Erzeu¬ 
gung lauffähiger CP/M-Programme. 
also COM-Files. Aus diesem Grunde 
wird natürlich das Programm LD.PAS 
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- genauergesaglLD.COM- die mei¬ 
sten Freunde gewinnen. BASIC ist und 
bleibt ein Interpreter, der immer wieder 
neu die Befehlszeile in den entspre¬ 
chenden Maschinencode übersetzen 
muß. Daher ist es zwangsläufig langsa¬ 
mer als ein Compiler wie Pascal. 

Zum Programmaufbau braucht nur we¬ 
nig gesagt zu werden. LD.BAS und 
LD.PAvS sind weitgehend selbsier- 
klärend. Das auf dem Bildschirm er¬ 
scheinende Hauptmenü gliedert sich in 
einen linken und einen rechten Teil. Die 
linke Spalte bietet Funktionen zur Para¬ 
meteränderung, also zum Beispiel die 
Alternative, ob der Ausdruck in Nor¬ 
mal- oder Schmaldruck erfolgen soll. 
Hier erfolgt die Auswahl durch ein- 
odcr mehrmaliges Betätigen der ange¬ 
gebenen ßuchstabentaste. Durch 
Drücken der Tasten <1> bis <6> im 
rechten Teil des Menüs werden Aktio¬ 
nen ausgelösl wie zum Beispiel “Dis¬ 
kette lesen” oder “LOCODIR-Liste 
ausdrucken”. 

BAS = PAS 

Die Programmbedienung ist selbstver¬ 
ständlich für die BASIC- und die Pas¬ 
cal-Version gleich. Zunächst legt man 
mit der Taste <L> das Laufwerk fest. 
Zwischen A: oder B: wird dabei umge- 
schaltel. Auf das Lesen der RAM-Disk 
M: wurde bewußt verzichtet, da unter 
CP/M dort normalerweise keine Lo- 
coScript-Dateien vorhanden sind. Mit 
der Taste <A> kann entschieden wer¬ 
den, ob die Schablon-Dateien (Erwei¬ 
terung STD) mit eingelesen und geli¬ 
stet werden sollen. Vom Programm 
voreingestellt ist “ohne Sehablon 
.STD”. Nebenbei bemerkt, hier zeigt 
sich der Vorteil von nichtkommerziel¬ 
len Programmen. Die Werte für die Vor¬ 
einstellungen (Startbedingungen) kön¬ 
nen nach Belieben geändert werden. 

Die Taste <T> entscheidet darüber, ob 
die Trans-Dateien ebcnfall.s eingelesen 
oder übersprungen werden sollen. Die¬ 
se versteckten Sicherheitskopien (in 
User 8 bis 15) werden von LocoScript 
bei jedem Löschen oder Überschreiben 
einer Datei erzeugt, ln der Art der 
BAK-Dateien wird zunächst die alte 
Datei mit einer neuen (um 8 erhöhten) 
User-Nummer versehen und erst da¬ 
nach die neue Dateiversion unter der 
gewählten User-Nummer gespeichert. 
Bei erneutem Speichern eines Textes 
der Gruppe 2 wird demnach die vorhe¬ 
rige Textversion unter User 10 als 
Trans-Datei gespeichert. Der Sinn ist 


h'ür noch mehr Ord¬ 
nung sorgen die hier 
t’inzugehenden 
Parameier 




liskttlcHtuM 

; »isk a 

Mw 

1 17.U.S2 

Amit 

; U.2» lOr 

iMMtUr 

: iMoStript-liskiUt nit InUilflm 

Hwar lisktttnHlMc 

i lisk 

ll»MS l«tw 

i 

Nwf 


Ntwr ItmtnUt 

1 1 

ftitn litfAm «U anMO kMtaftifH «4» «U <•> ttmtm ! 


klar; wurde eine Datei aus Versehen 
gelöscht, so kann durch Zurückholen 
der Trans-Datei zumindest die vorheri¬ 
ge Version des Textes gerettet werden. 
Die Verwendung von Trans-Dateien 
führt im übrigen dazu, daß CP/M be¬ 
reits eine volle Diskette meldet, 
während unter LocoScript noch ausrei¬ 
chend Platz vorhanden ist: nämlich der 
Platz der Trans-Dateien in User 8 bis 
15. Diese Dateien werden dann, wenn 
der Platz auf der Diskette benötigt wird, 
von LocoScript gelöscht. 

Der besseren Übersichtlichkeit wegen 
ordnet auch LOCODIR die Trans-Da¬ 
teien derjeweiligen Ilauptgruppe zu. In 
der Liste werden die Trans-Dateien, die 
ja den gleichen Namen wie die “norma¬ 
len” Dateien tragen, mit der Kennung 
“Tr” versehen. 

Die nächste Alternative, “mit” und “oh¬ 
ne” Info-Text das Verzeichnis einzule¬ 
sen, mag zunächst verwundern. Liegt 
doch gerade in der Ausgabe des Info- 
Textes der Sinn von LOCODIR. Trotz¬ 
dem i.st das Einlesen “ohne” für all jene 
sinnvoll, die bisher keine Info-Texte 
eingegeben haben und trotzdem einen 
Ausdruck ihrer LocoScripl-Directories 
erhalten möchten. Der Vorteil; In die¬ 
sem Fall benötigt das Programm zum 
Einlesen des Directorys bedeutend we- 
nigerZeit. 

Mit der Taste <S> wird die Soilierme- 
thode gewählt. Dabei kann zwischen 
Namen- und User-Soitierung uinge- 
schaltet werden. Bei ersterem werden 
alle Dateien unabhängig von der Grup¬ 
penzugehörigkeit nach ihrem Dateina¬ 
men sortiert. Bei der Sortierung “User” 
wird zunächst nach dem Gruppenna¬ 
men und innerhalb der Gruppe wieder¬ 
um nach Dateinamen geordnet. Die 
Sortiermethode kann auch noch nach 
dem Lesen der Diskette geändert wer¬ 


den - also vor der Ausgabe auf Bild¬ 
schirm oder Drucker. So können zwei 
Listen mit unterschied!icher Sortierfol¬ 
ge nacheinander ausgedruckt werden, 
ohne daß die Diskette neu eingelesen 
und bearbeitet werden muß. Der hier 
angewandte Sortieralgorithmus -(Sub- 
routine “Liste Sortieren”) arbeitet mit 
sogenannten Zeigern (Pointern). Dabei 
werden nicht die Dateien neu geordnet 
(also zum Beispiel in alphabetischer 
Reihenfolge umgespeichert), sondern 
ein Zeigerfcld ix(x) zeigt an, welche 
Datei die nächste (in der alphabeti¬ 
schen Reihenfolge) ist. Diese Sortier¬ 
methode ist sehr .schnell und daher ge¬ 
rade für BASIC zu empfehlen. 

Das Ergebnis auf dem 
Drucker 

Mit Hilfe der Option <D> kann zwi¬ 
schen Schmal- und Normaldruck des 
Joyce-Druckers gewählt werden. Bei 
Schmaldruck wird dabei nur eine Zeile 
pro Datei benötigt (zirka 50 Dateien pro 
Seite). Der Normaldruck ist demge¬ 
genüber zwar besser lesbar, es sind je¬ 
doch dann drei Zeilen für jede Lo- 
coScript-Datei erforderlich. So können 
nur etwa 18 Dateien auf einer Drucksei- 
,te untergebracht werden. Die genaue 
Anzahl der Dateien pro Seite hängt da¬ 
von ab, ob ein Kommentar eingegeben 
wurde oder nicht. 

Nun zu den'Aktionen <1> bis <6> auf 
der rechten Bildschirmhälfte. Mit dem 
Befehl <l> starten Sie den Lesevor¬ 
gang der Diskette. Der erste Eintrag im 
Directory wird daraufhin ermittelt, die¬ 
se Datei geöffnet und zunächst geprüft, 
ob es sich um eine LocoScript-Datei 
handelt. Das Programm erkennt dies an 
den ersten vier Zeichen der Datei, die 
“j” + “O” + “Y” + CHR$(01) lauten 
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müssen (im Programm werden diese 
vier Zeichen mit dem Variablennamen 
“KennungS” benannt). Anschließend 
stellt LD.BAS fest, um welche Lo- 
coScript-Version es sich handelt (das 
fünfte Byte in jeder Loco-Datei gibt 
Auskunft darüber). 

Dann schließlich - wenn die Loco- 
Prüfiing erfolgreich war - werden die 
90 Zeichen des Info-Textes eingelesen 
und in der Subroutine “Infotext-Forma- 
tierung” aufbereiict. Dabei werden 
zunächst die übeiflüssigen Leerzei¬ 
chen entfernt, die bei der dreizeiligen 
Eingabe unter LocoScript (3 x 30 Zei¬ 
chen) zwangsläufig oft vorhanden sind. 
Ebenso müssen die deutschen Umlaute 
umgewandelt und für CP/M darstel Ibar 
sein (German ASCH). Warum bei der 
LocoScript-Version 2 die Kodierung 
der deutschen Umlaute gegenüber der 
Version l geändert wurden, bleibt un¬ 
klar. Für das Programm bedeutet dies 
jedoch zwei Umlaut-Konvertierungs¬ 
routinen. die je nach Versionsnummer 
angesprungen werdenmüssen. 

Es besteht die Möglichkeit, zum Bei¬ 
spiel den Standardgruppennamen 
"gruppeO” in “BRIEFE” umzubenen- 
nen. Die Namen der User-Gruppen 
werden nämlich unter LocoScript mit 
einem Trick gespeichert. Es wird ein¬ 
fach eine leere Datei mit dem Gruppen¬ 
namen und der Extension GRP im je¬ 
weiligen User-Bereich abgelegt (zum 
Beispiel BRIEFE.GRP = 0 kByte). Ist 
dort keine Datei mit der Erweiterung 
GRP vorhanden, so heißt die Gruppe 
entsprechend dem obigen Beispiel wei¬ 
terhin “gruppcü” - andernfalls wird 
der Name der GRP-Datei übernom¬ 
men, hieralso*‘BRIEFE*\ 

Natürlich kann LOCODIR diese Alt 
der Gruppenbenennung entschlüsseln 


und die Dateien dem tatsächlich einge¬ 
gebenen Gruppennamen zuordnen. 
Deshalb also im Programm die Suche 
nach den Dateien*.GRP. 

Während der Diskettenbearbeitung 
werden auf dem Bildschirm die Namen 
der durchsuchten Dateien und die An¬ 
zahl der gefundenen LocoScript-Datei- 
en angezeigt. Der Einlese- und Ent- 
schlüsselungsvorgang benötigt natür¬ 
lich einige Zeit und ist nicht vergleich¬ 
bar mit dem Aufruf “DIR”. Verständ¬ 
lich, die eingelesene Information ist 
eben umfangreicher. 

Bei zweiseitig beschriebenen Disket¬ 
ten - akso solchen für das Laufwerk A 
- kann das Directory der B-Seite dem 
bereits eingelesenen Directory der A- 
Seite zugefügt werden. Die Betätigung 
der Taste <2> bewirkt, daß die bis dahin 
eingelcsenen Daten nicht gelöscht und 
die nun folgenden Daten angehängt 
werden. Man erhält also - wenn man 
es möchte - ein sortiertes Listing der 
gesamten Diskette, wobei im Listing¬ 
ausdruck die Dateien mit Seite A und B 
gekennzeichnet sind. 

Wenn schon ein wohlsortiertes und kor¬ 
rekt gegliedertes Listing aufs Papier 
gebracht wird, dann sollte der Aus¬ 
druck eines Kommentars zur jeweili¬ 
gen Diskette dazugehören. Dabei kann 
(muß jedoch nicht) eingegeben wer¬ 
den: 

der Diskettenname/die Disketten-Num- 
mer 

das Datum 
dieUhrzcit 

ein Kommentar zum Diskctteninhall 
Auch hierbei wurde die Menüstruktur 
des Programms beibehalten. ln einem 
Kommentannenü lassen sich die ge¬ 
nannten Daten eingeben und editieren. 
Der Kommentartexi muß daher nicht 


vor jeder Diskettenbearbeitung oder 
Druckerausgabc neu eingetippt wer¬ 
den, sondern bleibt auch bei der folgen¬ 
den Diskette erhalten. So genügt es in 
den meisten Fällen, das Datum einmal 
mitzuteilen und dann jeweil.s nur noch 
den Diskettennamen zu ändern. 

Die Aktionen “LOCODIR-Liste anzei- 
gen” und “LOCODIR-Liste aus- 
drucken” bedürfen .sicherlich keiner 
Erklärung. Die Auswahl der Drucker- 
schnitistelle mittels Taste <6> ist für je¬ 
ne Joyce-Besitzer/innen von Nutzen, 
die über das Schnittsiellenmodul CPS 
8512 einen externen Drucker anstcu- 
ern. Im aufgerufenen Schnittstellen¬ 
menü läßt sich ohne den Umweg über 
das Dienstprogramm DEVICE.COM 
die Druckerausgabe zur seriellen oder 
Centronics-Schnittstelle umleiten. 
Diese Umleitung der Druckerausgabc 
bleibt bewußt auch nach Programmen¬ 
de und auch noch nach der Rückkehr zu 
CP/M bestehen. Ein weiterer Hinweis: 
Die im Programm verwendeten 
Druckersteuercodes gelten sowohl für 
den Joyce-Systemdrucker als auch für 
EPSON-kompatible Drucker. Für Be¬ 
sitzeranderer Druckertypen lassen sich 
die Drucker-Steuercodes DruReset$. 
Ger$, EI ileS und SchmalS leicht anpas¬ 
sen. 

Wolfgang Ottemberg/rs 


Um die Joycc-Rubrik nicht unnötig mit 
Programmlistings “vollzustopfcn”, ha¬ 
ben wir un.s entschieden, lediglich das 
Mallard-BASIC-Progranfrh abzu¬ 
drucken. Den Pascal-Quclltcxt sowie 
das fertig compilierte Programm ent- 
neiimen Sie bitte der Joyce-DATABOX 
zu diesem Heft. 


<1B> lOO ' LOCODIR.BAS 

<20> 110 ' JOYCE/PCW 8256/8512/9512 

<22> 120 ' (c) 1992 Wolfgang Otternberg 

<50> 130 ' . & CPC International 

<22> 140 ; 

<64> 150 Vers$="Version 2.10 
<23> 160 Ausgabe$=''02/1992'' 

<28> 170 : 

<88> ISO DEFINT a-2 
<32> 190 : 

<51> 200 '- Allgemeine Konstanten - 


<22> 210 ESCS=CHR$(27). 'Escape 

<49> 220 FFS=CHRS(12). 'Form Feed 

<5l> 230 CLS$=ESCS+''E”+ESC$+”H''. 'Bildschirm 

<26> 240 InvES=ESCS+CHRS{ll2). 'inverse Dar 

Stellung ein 

<63> 250 InvA$=ESC$+CHRS(113}. 'inverse Dar 

Stellung aus 

<77> 260 DruReset$=ESC$+”@’'. 'Drucker Res 

et 


<23> 270 GerS=ESC$+"R"+CHRS(2). 'deutscher Z 

eichensatz 

<23> 280 EliteS=ESCS + ”M". 'Elite-Schri 

ft 

<70> 290 Schmal$=CHR$(l5). 'Schroalschri 

ft 

<29> 300 CursorEinS=ESCS+"e". 'Cursor sich 

tbar 

<74> 310 CursorAus$=ESC$+"f'■. 'Cursor unsi 

chtbar 

<15> 320 Kennung$**'JOy"+CHR$(l) 

<73> 330 StrichS=STRINGS{89,"-") 

<57> 340 RahinenStrichS=CHR$(135)+STRING$(S7,CHRS(l 
3B))+CHRS(141) 

<76> 350 BinaxS=135. 'iiiax. Breite 

Schmaldruck 

<31> 360 Bma>dl=89. 'max. Breite 

Normaldruck 

<74> 370 ZeilMax=53. 'max. Zeilen 

/Seite 

<32> 380 ; 


<50> 390 '- Voreinstellungen 
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< 4> 400 ON ERROR GOTO 4370 

<24> 410 MaxFile=200.. 'max. Anzahl 

LocoDateien 

<62> 420 DIM InfoFeld$(MaxFile,6),ix(MaxFile) 

< 4> 430 OPTION FILES "0" 

<45> 440 WIDTH 255 

<43> 450 WIDTH LPRINT 150 
<80> 460 MitSchab$=’'n" 

< 7> 470 MitTransS="n'' 

<14> 400 Laufwerk$="A'' 

< 7> 490 MitrnfoTS*"j" 

<90> 500 SortWahl$='*N‘' 

<60> 510 DruckMod$="S" 

<61> 520 SortWahlAltS="X" 

<24> 530 : 

<74> 540 '- Hier Eihsprung nach Fehler oder Ab 

bruch - 

<28> 550 : 

<55> 560 DEF FNGotoXYS (x,y) =ESC$+"Y''+CHR$ (31+y)+CH 
R$(31+x) 

<32> 570 : 

<8l> 580 '«=*=== Hauptmenue -========B====:==x==a8SB= 

<7l> 590 PRINT InvA$;CursorAus$; 

<54> 600 GOSUB 4120.... '=>Rahmen zeichnen 
<44> 610 PRINT FNGotoXYS(3,3);Vers$; TAB(33);" L 0 
C O D I R . B A S"; 

<16> 620 PRINT TAB(82);AusgabeS 

<68> 630 PRINT FNGotoXYS{8,9);"L =. Lau 

f werk ** 

<81> 640 PRINT FNGotoXYS(8,ll);"A = . Sc 

hablon.STD" 

<28> 650 PRINT FNGotoXYS(8,13);«T =. Tr 

ans-Dateien” 

<59> 660 PRINT FNGotoXYS(8,15);"I = . In 

fo-Text" 

<63> 670 PRINT FNGotoXYS(8,17);"S *. So 

rtierung" 

<41> 680 PRINT FNGotoXyS(8,19);"D = . Dr 

uck" 

<48> 690 PRINT FNGotoXYS(50,9);"1 


Diskette lesen 
eventuell Sei 
Kommentar ein 
LOCODIR-Liste 
LOCODIR-Liste 
Drucker-Schni 
Programm been 


<33> 700 PRINT FNGotoXYS{50,11);"2 
te B dazulesen" 

<73> 710 PRINT FNGotoXY$(50,13);"3 
geben/aendern" 

<97> 720 PRINT FNGotoXYS(50,15);"4 
anzeigen" 

<52> 730 PRINT FNGotoXYS(50,17);"5 
ausdrucken" 

<32> 740 PRINT FNGotoXYS(50,19);"6 
ttstellen-Wahl" 

<28> 750 PRINT FNGotoXYS(50,21);"X 
den" 

<39> 760 PRINT FNGotoXYS(3,29);"Durchsuchte Dateie 
n: ";DatZahl; 

<41> 770 PRINT TAB(65);"LOCOSCRIPT-Däteien: ";LocZ 
ahl; 

<2a> 780 PRINT FNGotoXYS(13,9);InvE$; 

<85> 790 IF LaufwerkS="A" THEN PRINT "... A: " 

ELSE PRINT "... B: " 

<73> 800 PRINT FNGotoXYS(13,11); 

<57> 810 IF MitSchab$-"j" THEN PRINT ".... mit. " 
ELSE PRINT "... ohne. " 

<28> 820 PRINT FNGotoXYS(13,13); 

< 4> 830 IF MitTransS="j" THEN PRINT "_ mit. " 

ELSE PRINT "... ohne. " 

<82> 840 PRINT FNGotoXYS^3/15) ; 

<47> 850 IF MitInfoTS="j" THEN PRINT "_ mit. " 

ELSE PRINT "... ohne. " 

<37> 860 PRINT FNGotoXYS(13,17); 

<66> 870 IF SortWahlS»"N" THEN PRINT Namen- " 
ELSE PRINT " Gruppen- " 

<91> 080 PRINT FNGotoXY$(13,19); 

<48> 890 IF DruckModS="E" THEN PRINT ". Normal- " 
ELSE PRINT Schmal- " 

<22> 900 PRINT InvAS 

<96> 910 PRINT FNGotoXYS(20,25);"Bitte druecken Si 
e die entsprechende Taste"; 

<74> 920 WahlS=ÜPPER$(INKEYS) 

<83> 930 IF INSTR ("LATISD123456X",WahlS)<1 THEN 9 
20 

<94> 940 IF WahlS="L" THEN IF Laufwerk$="A" THEN L 
aufwerkS="B'* ELSE LaufwerkS="A" 

<68> 950 IF WahlS="A" THEN IF MitSchab$="n" THEN M 
itschab$*"j" ELSE MitSchab$="n" 

<58> 960 IF Wahl$«^"T" THEN IF MitTrans$="n" THEN M 
itTransS*"i" ELSE MitTransS="n" 

<27> 970 IF Wahl$="I" THEN IF MitInfoT$="n" THEN M 
itlnfoT$*"j" ELSE MitInfoTS="n" 


<32> 

<55> 

<53> 

<72> 

<74> 

<85> 

<81> 

<97> 

<71> 

<97> 

<23> 

<48> 

<30> 

<30> 

<43> 

<19> 

< 21 > 

<24> 

<19> 

<67> 

< 21 > 

<80> 

<63> 

<73> 

<42> 

<75> 

<93> 

<32> 

<78> 

<58> 

< 3> 
<53> 
<40> 

<41> 

<64> 

<73> 

<96> 

<77> 

<81> 

<76> 

<89> 

<73> 

<52> 

<15> 

< 68 > 

<30> 

<32> 

< 2 > 
< 88 > 

<30> 

<52> 

<33> 

<30> 

<41> 

<75> 

<42> 

<40> 

<92> 

<52> 

<97> 

<96> 

<42> 

<42> 

<50> 

<80> 

<85> 
< 6 > 

<B2> 

<B4> 


980 IF Wahl$="S" THEN IF SortWahlS= 
ortWahlS="G" ELSE SortWahlS="N" 

990 IF WahlSs="D" THEN IF DruckModS = 
ruckModS“"S" ELSE DruckMod$a"E" 
1000 IF Wahis»"l" THEN GOSUB 1100 
1010 IF Wahis="2" THEN GOSUB 1100 : 
1020 IF WahlS="3" THEN GOSUB 3290 : 
1030 IF WahlS*"4" THEN GOSUB 2960 : 
1040 IF WahlS=’'5" THEN GOSUB 2380 ; 
1050 IF WahlS="6" THEN GOSUB 3700 : 
1060 IF WahlS="X" THEN 4290 
1070 GOTO 780 
1080 : 

1090 '===== Daten einiesen ======*= 


r''N" THEN S 

r''E" THEN D 

GOTO 600 
GOTO 600 
GOTO 600 
GOTO 600 
GOTO 600 
GOTO 600 


1100 IP Wahis®="2" THEN Seite$«"B" :GOTO 1170 
1110 DatZahl=0 
1120 Loc2ahl=0 
1130 Seite$="A" 

1140 ERASE InfoFeldS 

1150 DIM InfoFeld$(MaxFile,6) 

1160 : 

1170 PRINT CLSS 

1180 PRINT FNGotoXYS(1,4); 

1190 PRINT "Bitte warten - Dateien werden unt 
ersucht" 

1200 PRINT 

1210 SortWahiAltS="X". ' Sortieren erforderli 
ch 

1220 IF MitTrans$="j" THEN Maxüser=l5 ELSE Ma 
xUser=7 

1230 OPTION FILES LaufwerkS 
1240 User=0 

1250 WHILE üser<=MaxUser '- Schleife l. ü 

SER 

1260 OPTION FILES STRS(User) 

1270 Datei=l 
1280 Trans$="" 

1290 FileName$=PINDS("*.*",l) 

1300 IF FileName$="" THEN GOTO 1630. 'leere D 
isk / leerer Userbereich 

1310 IF User <8 THEN GruppeS “ LEFTS(FINDS("* 

.grp"),8): GOTO 1360 

1320 OPTION FILES STR$(ÜSer-8) 

1330 Trans$="Tr" 

1340 Gruppe$=LEFTS(FINDS{"* .grp"), 8) 

1350 OPTION FILES STR$(User) 

1360 IP GruppeS“’"" THEN GruppeS="gruppe"+ STR 
S{üser MOD 8) 

1370 WHILE FileNaraeS>"". '-Schleife 2. D 

atei 

1380 PRINT 

1390 Dat2ahl=DatZahl+i 

1400 PRINT USING "####";Datzahl; 

1410 PRINT ". üser";User;TAB(15);FileNameS; 
1420 IF MitSchabS="n" THEN IF FileNameS="SCHA 
BLON.STD" THEN GOTO 1610 

1430 IF RIGHTS(FileNaraeS,3)="GRP" THEN GOTO 1 
610 

1440 IF Loczahl = MaxFile THEN PRINT:PRINT"Sp 
eicher voll M":GOTO 2050 
1450 OPEN "i",l,FileNameS 

1460 IF INPUTS(4,#1) <> KennungS THEN 1600... 

'keine Locoscript-Datei 
1470 LocZahl*LocZahl+l 

1480 IF RIGHTS(FileNameS,4)="... " THEN FileN 
ameSssLEFTS (FileNameS, 8) 

1490 InfoFeldS(LocZahl , 1)=FileNameS 
1500 InfoFeldS(LocZahl,2)=GruppeS 
1510 InfoFeldS(LocZahl,3)=Seite$ 

1520 Version$=lNPUTS(l,#l) 

1530 InfoFeldS(LocZahl,4)=CHR$(48+ASC(Version 

$)). 'LScript 1 oder 2 

1540 InfoFeldS(LocZahl,6)=TransS 

1550 PRINT TAB(32);"Loco-Datei Nr.: ";LocZahl 


1560 IF MitInfoTS="n" THEN 1600 
1570 TxtS=INPUTS(90,#l) 

1580 GOSUB 1700. '=> Infotext-Formati 

erung 

1590 InfoFeldS(Loczahl,5)=InfoTxtS 
1600 CLOSE 1 


1610 Datei=Datei+l:FileNameS=FINDS 
i) 


( 


Date 


1620 WEND. '-Ende Schleife 

2. Datei 


1630 User=User+l 

1640 WEND. '-Ende Schleife 

1. User 

1650 OPTION FILES "0" 

1660 OPTION STOP 
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<12> 1670 GOSUB 4000. ’-> weiter mit RETÜR 


<56> 2420 PRINT FNGotoXY$(15,15); 

M 


<79> 2430 PRINT "Bitte Papier in den Drucker einle 

<15> 1680 RETURN 


gen" 

<38> 1690 : 


<56> 2440 PRINT FNGotoXYS(15,20); 

<95> 1700 'seis=== Infotext-Fomatierung ssBsaasss»Bs=== 


<38> 2450 PRINT "Drucker bereit (1/n): 



<B1> 2460 GOSUB 4060_ '=> JaNein 

<47> 1710 IF MID$(Txt$,60,l)<>” " THEN TxtS=LEFT$( 


<95> 2470 IF JaNeinS*"N" THEN RETURN 

TxtS,60)+” "+MIDS(Txt$,61) 


<77> 2480 PRINT CLSS 

<29> 1720 IF MIDS(TxtS,30,l)<>" " THEN TxtS=LEFTS( 


<69> 2490 PRINT PNGotoXYS(28,15); 

Txt$,30)+" "+MID$(TxtS,31) 


< 7> 2500 PRINT "Die Daten werden ausgedruckt. 

<12> 1730 InfoTxtS = '"’ 


• t 

<17> 1740 IF VersionS=CHRS(2) THEN 1920 


<47> 2510 IF DruckModS="E" THEN DruckBreite=BmaxN 

<28> 1750 : 


ELSE DruckBreite=BmaxS 

< 9> 1760 '- Umlaute LOCOSCRIPT l.xx - 


<7l> 2520 Zeilen=ZeilMax 

<40> 1770 FOR n=l TO LBN(TxtS) 


<57> 2530 DruStrichS=STRINGS(DruckBreite,"-") 

<82> 1780 ZS=MID$(TxtSrn,l) 


<60> 2540 LPRINT DruResetS;Ger$;EliteS; 

<12> 1790 IF Z$<CHR$(128) THEN 1880 


<48> 2550 IF DruckModS="S" THEN LPRINT SchmalS; 

<91> 1800 IF Z$=CHRS(208> THEN Z$=CHR$(91).. 'Ae 


<59> 2560 GOSUB 2780.... '=> Listen-Ueberschrift A 

< 9> 1010 IF Z$=CHRS(211) THEN ZS»CHR$(92).. 'Oe 


< 21 > 2570 GOSUB 2900_ '*> Listen-Ueberschrift B 

<22> 1820 IF ZS=CHRS(212) THEN ZS=CHR$(93) . . 'Ue 


<98> 2580 zz=0+zzo. 'Zeilenzaehler + Offset l 

<13> 1830 IF ZS=CHRS(240) THEN 2S=CHR$(123). 'ae 


.Seite 

< 5> 1040 IF Z$=CHR${243) THEN Z$*CHR$(124). 'oe 


<10> 2590 x=ix(0) 

<19> 1850 IF ZS=CHR$(244) THEN Z$=CHR$(125). 'ue 


<77> 2600 WHILE X>0 

<76> 1860 IF Z$=CHRS(186) THEN Z$=CHR$(126). 'ss 


<e4> 2610 LPRINT " ";InfoPeldS(x,1);TAB(16);InfoFe 

<22> 1870 IF (ZS>CHRS(I28))AND(Z$<CHR$(159)) THEN 


IdS(X, 2 ); 

ZS*"." . 'Erw.-Zeichen 


<25> 2620 LPRINT TAB(27);InfoFeldS(X,6);TAB(32);In 

<39> 1880 IF zs<>" " OR RIGHT$(InfoTxtS, 1 )<>" " TH 


foFeld$(x,3); 

EN InfoTKt$=InfoTxt$+ZS 


<63> 2630 LPRINT TAB(36);InfoFeldS(X,4.XX"; 

<71> 1890 NEXT n 


<41> 2640 IF DruckModS="S" THEN LPRINT TAB(43);Inf 

<96> 1900 RETURN 


OFeldS(x,5):GOTO 2680 

<20> 1910 : 


<58> 2650 LPRINT TAB(43);LEFTS{InfoFeldS(x,5), 46) 

<33> 1920 ' - Umlaute LOCOSCRIPT 2.XX - 


<42> 2660 LPRINT TAB(43);MIDS(InfoFeldS(x,5),47,46 

<32> 1930 FOR n*l TO LEN(TxtS) 


) 

<74> 1940 ZS=MIDS(TxtS,n,l) 


<48> 2670 LPRINT DruStrichS 

<29> 1950 IF ZS<CHRS(128) THEN 2020 


<77> 2680 IF DruckM 0 dS»"E" THEN ZZ=22+3 ELSE ZZ=ZZ 

<29> 1960 IF ZS»CHRS(227) THEN ZS=CHR$(91).. 'Ae 


+ 1 

<81> 1970 IF ZS=CHRS(228) THEN ZS=CHRS(92).. 'Oe 


< 6 > 2690 IF ZZ >* Zeilen THEN LPRINT FFS: GOSUB 2 

<94> 1980 IF 2S=CHRS(229 ) THEN ZS==CHR$(93) . . 'Ue 


900 :2Z*0 

<90> 1990 IF ZS=CHRS(243) THEN ZS=CHR$(123). 'ae 


<94> 2700 x*ix(x) 

<96> 2000 IF 2S=CHRS(244) THEN ZS=CHRS(124). 'oe 


<29> 2710 WEND 

<11> 2010 IF ZS=CHR$(245) THEN ZS=CHR$(125). 'ue 


< 9> 2720 IF DruckModS»"S’' THEN LPRINT DruStrichS 

<82> 2020 IF Z$*CHR${96} THEN Z$*CHRS(126).. 'ss 


<59> 2730 LPRINT " Durchsuchte Dateien:";Dat2ahl; 

<94> 2030 IF (Z$>CHRS(128))AND(ZS<CHR$(159)) THEN 


<16> 2740 LPRINT TAB(DruckBreite-29);"davon LocoSc 

2$=".". 'Erw.-Zeichen 


ript-Dateien:";LocZahl 

< 12 > 2040 IF ZS<>" " OR RIGHTS(InfOTxtS, 1 )<>" " TH 


<29> 2750 LPRINT Elite$;FF$; 

EN infoTxtS=lnfoTxtS+ZS 


<12> 2760 RETURN 

<44> 2050 NEXT n 


<35> 2770 : 

<97> 2060 RETURN 


<92> 2780 '- Listen-Ueberschrift A - 

<21> 2070 : 



<42> 2080 '—=— Liste sortieren =**=====_===- 


<17> 2790 LPRINT " L 0 C 0 D I R . BAS"? 

= = ======z=3==ssss:ss;s:ss:ss 


<13> 2800 LPRINT TAB(DruckBreite-lo);Vers$ 

<13> 2090 IF LocZahl =0 THEN RETURN 


<41> 2810 LPRINT 

<10> 2100 IF SortWahlS=SortWahlAlt$ THEN RETURN 


<21> 2820 z 2 o= 3 . 'Zeilenzaehler-Offset bei erster 

<50> 2110 PRINT CLSS 


Seite 

<90> 2120 PRINT FNGotoXrS( 1 ,5);"Liste wird neu sor 


<24> 2830 IF DiskNameS>"" THEN LPRINT" Disk-Name : 

tiert" 


"DiskNameS: 220 = 220+1 

< 4> 2130 PRINT FNGotoXYS(l, 8 ); 


<73> 2840 IF DatumS>"" THEN LPRINT " Datum_ : " 

<41> 2140 ERASE ix 


;Datums: 220 = 220+1 

<51> 2150 DIM ix(MaxFile) 


<31> 2850 IF Zeit$>"" THEN. LPRINT " Zeit. : " 

<29> 2160 FOR n=l TO LocZahl 


;Zeit$ : zzo=zzo+l 

<13> 2170 PRINT USING 


< 5> 2860 IF Kommentars»"" THEN LPRINT " Kommentar 

< 7> 2180 Zeiger=ix(0) 


: ";KommentarS; zzo=zzo+l 

<64> 2190 AltZeiger^O 


<59> 2870 LPRINT 

<94> 2200 IF SortWahlS="N" THEN GOTO 2260 


<20> 2880 RETURN 

<42> 2210 WHILE (InfoFeldS(Zeiger,2)+InfoFeld$(Zei 


<43> 2890 : 

ger,l))<=(InfoFeldS(n, 2 )+lnfoFeldS(n,l))AND Z 


< 6 > 2900 '- Listen-Ueberschrift B - 

eiger >0 



< 3> 2220 AltZeiger=Zeiger 


<36> 2910 LPRINT DruStrichS 

<50> 2230 Zeiger*ix(Zeiger) 


<23> 2920 LPRINT" Dateiname.... Gruppe.. Tran Seit 

<28> 2240 WEND 


e Vers.. Info-Text" 

<59> 2250 GOTO 2300 


<42> 2930 LPRINT DruStrichS 

< 8 > 2260 WHILE InfoFeldS(Zeiger,1)<=lnfoFeldS(n,1 


<10> 2940 RETURN 

) AND Zeiger >0 


<33> 2950 : 

<18> 2270 AltZeiger=Zeiger 


<74> 2960 '==*== Liste anzeigen ================== 

<73> 2280 Zeiger=ix(Zeiger) 


=3s = s3ssss3;ssse»s!ssss3s;ass88 

<43> 2290 WEND 


<49> 2970 IF LocZahl*0 THEN GOSUB 4230 : RETURN 

< 7> 2300 ix(n)*Zeiger 


<90> 2980 GOSUB 2080... '=> Liste sortieren 

<27> 2310 ix(AltZeiger)=n 


<90> 2990 PRINT CLS$ 

<41> 2320 NEXT n 


<13> 3000 GOSUB 3160.. '=> Bildschirm-Ueberschrift 

< 68 > 2330 SortWahlAlt$=SortWahl$ 


•<65> 3010 ZZ=9 

<78> 2340 PRINT 


<87> 3020 x=ix(0) 

<22> 2350 GOSUB 4000. '=>Weiter mit Taste 


<75> 3030 WHILE X>ü 

< 4> 2360 RETURN 


<13> 3040 PRINT " "?InfoFeldS(x, 1 );TAB( 16 ) 7 InfoFel 

<27> 2370 : 


dS(x, 2 ); 

<24> 2380 '====* Liste drucken ===* 0 »============= 


<45> 3050 PRINT TAB(27);InfoFeldS(X,6)7TAB(32);Inf 



oFeld$(x,3); 

<94> 2390 IF LocZahl=0 THEN GOSUB 4230 :RETURN 


< 7> 3060 PRINT TAB(36);InfoFeldS(x,4);".XX"7 

<56> 2400 GOSUB 2080... '=> Liste sortieren 


< 5> 3070 PRINT TAB(43);LEFTS(InfoFeldS(x,5),46) 

<56> 2410 PRINT CLSS 
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<18> 3080 PRINT TAB(43);MIDS(InfoFeldS{x,5),47,46) 
<92> 3090 PRINT STRICHä 
<83> 3100 X=ix(X) 

<86> 3110 Z2=ZZ+3 

<36> 3120 IF zz=30 OR x=0 THEN Z 2 = 0 : GOSU8 4000 :P 
RINT CLS$ 

<24> 3130 WEND 
<94> 3140 RETURN 
<18> 3150 ; 

< 62 > 3160 '- Bildschirm-Ueberschrift - 


<30> 
< 6 > 
<90> 
<34> 
<89> 
<39> 

< 4> 

< 6 > 
<65> 

< 12 > 
< 6 > 
<29> 
<31> 

<53> 

<71> 

< 21 > 

<85> 

<58> 

<25> 

< 68 > 

<96> 

<95> 

<71> 

<30> 

<17> 

<15> 

<34> 

<13> 

<60> 
< 6 > 

<72> 

< 88 > 

< 11 > 

< 0 > 
<56> 

<78> 

<56> 

<43> 

<67> 

<61> 

< 5> 
<30> 
<57> 

< 9> 
<90> 

<98> 

<16> 

< 9> 
<27> 
<82> 
<38> 
<67> 
<40> 

< 4> 


B a s"/ 


"DiskNameS 

Datums 

";Zeit$ 

"»•Kommentars 

. Gruppe.. Tran Seite 


3170 PRINT " L 0 C 0 D I R 
3180 PRINT TAB(76);VersS 
3190 PRINT 

3200 PRINT" Disk-Name 
3210 PRINT " Datum.. . . 

3220 PRINT " Zeit . 

3230 PRINT " Kommentar 
3240 PRINT Strichs 
3250 PRINT" Dateiname. 

Vers.. Info-Text" 

3260 PRINT Strichs 
3270 RETURN 
3280 : 

3290 'sststss Kommentar eingeben =»«=========== 

3300 GOSüB 4120... '=> Rahmen zeichnen 
3310 PRINT FNGotoXY$(30,3);"K ommentar 
- M e n u e" 

3320 PRINT FNGotoXYS{15,8);"Disketten-Name... 
... : DiskNameS 

3330 PRINT FNGotoXYS(15,10);"Datum. 

.... : "; Datums 

3340 PRINT FNGotoXYS(15,12);"Uhrzeit. 

- : ";ZeitS 

3350 PRINT FNGotoXy$(l5,14);"Kommentar . 

.... : Kommentars 

3360 PRINT FNGot0XYS(8»29); 

3370 PRINT "Daten eingeben., oder., mit <RETü 
RN> bestaetigen" ; 

3380 PRINT oder., mit <*> loeschen"; 

3390 PRINT CursorEinS; 

3400 PRINT FNGOtoXYSU5,lB) ; 

3410 INPUT »‘"Neuer Disketten-Name : "»Eingabe 

$ 

3420 IF Eingabe$>"" THEN DiskNameS=EingabeS 
3430 IF EingabeS="*" THEN DiskNameS*"" 

3440 PRINT FNGotoXYS(38»8);Diskname$;STRING$( 
50-LEN ( DisknameS } » " ") 

3450 PRINT FNGotoXYS(15»20) ; 

3460 INPUT ,'"Neues Datum . : "»Eingabe 

$ 

3470 IF EingabeS>"" THEN DatumS=Eingabe$ 

3480 IF EingabeS="*" THEN DatumS="" 

3490 PRINT FNGotoXYS (38,10 );Datum$;STRINGS(50 
-LEN(DatumS)/' ") 

3500 PRINT FNGotoXYS(15»22); 

3510 INPÜT ;"Neue Zeit . : "»Eingabe 

S 

3520 IF Eingabe$>"" TUEN ZeitS=Eingabe$ 

3530 IF EingabeS*"*" THEN ZeitS="" 

3540 PRINT FNGotoXY$(38»12);ZeitS;STRING$(50- 
LEN(ZeitS)," ") 

3550 PRINT FNGotoXY$(15,24) ; 

3560 INPUT ;"Neuer Kommentar . : "»Eingabe 

S 

3570 IF EingabeS>"" THEN Koinmentar$=EingabeS 
3580 IF EingabeS="*" THEN Kommentars*"" 

3590 PRINT FNGotoXY$(38»14);KommentarS;STRING 
S(50-LEN(KoramentarS)," ") 

3600 PRINT CursorAusS; 

3610 PRINT FNGotoXY$(8,29);"Eingabe in Ordnun 
g ? j /n"; STRINGS( 56,’* "); 

3620 GOSÜB 4060... '=> JaNein 
3630 IF JaNein$="J" THEN RETURN 
3640 PRINT FNGotoXYS (38, 18);STRINGS(50»" ") 
3650 PRINT FNGotoXYS(38,20);STRINGS(50," ") 
3660 PRINT FNGotoXYS(38»22);STRINGS(50," 

3670 PRINT FNGotoXYS(38,24);STRINGS(50," 

3680 GOTO 3360 
3690 : 

3700 '===== Schnittstellen-Wahl ======== 


"> 


<36> 3710 LstA=SHFBC7 

< 6> 3720 CEN$=" Centronics-Schnittstelle " 
<23> 3730 SI0S=" Serielle Schnittstelle.. " 

<73> 3740 DRU$=" JOYCE-System-Drucker_ " 

<76> 3750 GOSÜB 4120... '=> Ratimen zeichnen 


< 9> 3760 PRINT FNGotoXYS{23 , 3 ) ; 

<18> 3770 PRINT "SCHNITTSTELLEN. -. M 
ENDE" 

<34> 3780 PRINT FNGotoXYS ( 10,10) ; 

<14> 3790 PRINT "Die Druckerausgabe erfolgt jetzt 
ueber : "; 

<42> 3800 LstI=PSEK(LstA) 

<50> 3810 PRINT FNGotoXYS(51,10);InvES; 

<34> 3820 IF LstI=&H10 THEN PRINT CEN$; 

<95> 3830 IF LstI=&H20 THEN PRINT SIOS; 

<52> 3840 IF LstI=&H40 THEN PRINT DRUS; 

<13> 3850 PRINT InvAS 

<30> 3860 PRINT FNGotoXYS(30,14);"J = ";DRU$ 

<37> 3870 PRINT FNGotoXYS(30»16 ); "S * ";SIOS 
<38> 3880 PRINT FNGotoXYS(30 , 18);"C * ";CBN$ 

< 1> 3890 PRINT FNGotoXYS UO,29); 

<64> 3900 PRINT "Bitte waehlen Sie. J, S oder C.. 

-. dann "; 

<97> 3910 PRINT "mit <RETÜRN> Menue verlassen"; 
<20> 3920 Eingabe$=üPPERS(INKEYS) 

<66> 3930 IF EingabeS = "J" THEN POKE LstA,StH40:GOTO 
3780 

<63> 3940 IF EingabeS="S" THEN POKE LstA,&H20:GOTO 
3780 

<20> 3950 IF EingabeS="C" THEN POKE LstA,ScHl0 : GOTO 


<70> 

<90> 

<23> 

<46> 

< 16 > 

<87> 

<98> 

<24> 

<93> 

<17> 

<46> 

<64> 

<a6> 

< 7> 

< 22 > 

< 7> 
<73> 

<58> 

<72> 

<48> 

<82> 

<38> 

<50> 

<74> 

<g6> 

< 88 > 

< 12 > 

<77> 

<63> 

<91> 

<93> 

< 7> 
<30> 
<61> 

< 1 > 

<19> 

<76> 

<16> 

<46> 

<90> 

<26> 

<63> 


3780 

3960 IF EingabeS=CHRS(13) THEN RETURN 
3970 GOTO 3920 
3980 RETURN 
3990 : 

4000 '=»=== Weiter mit beliebiger Taste 


PRINT FNGotoXYS(60,31); 

PRINT "Weiter mit beliebiger Taste "; 

WHILE INKEyS="";WEND 

RETURN 


4010 
4020 
4030 
4040 
4050 
4060 

4070 
4080 
N 

4090 
TURN 
4100 
4110 
4120 


JaNeinS=UPPER$(INKEYS) 

IF JaNeinS*"N" OR JaNeinS="J" THEN RETUR 
IF JaNein$=CHRS(l3) THEN JaNeinS=”J": RE 
GOTO 4070 

'====58 Rahmen zeichnen ================= 


4130 PRINT CLSS 

4140 PRINT PNGotoXY$(l,l);CHR5(134)-;STRINGS(8 
7,CHRS(138));CHR$(140); 

4150 FOR n=2 TO 29: PRINT FNGotoXYS(1,n);CHR$ 
(133);;NEXT n 
4160 PRINT 

4170 FOR n=2 TO 29: PRINT FNGotoXYS(89,n);CHR 
$(133);:NEXT n 

4180 PRINT FNGotoXYS(l,30);CHR$(131);STRING$( 
87,CHRS(138));CHRS(137) 

4190 PRINT FNGotoXYS(1,5);Rahmenstrich$ 

4200 PRINT FNGotoXYS(1,28);Rahmenstrichs 
4210 RETURN 
4220 : 

4230 '===== Keine Loco-Datei ================ 


4240 PRINT CLSS 

4250 PRINT FNGotoXyS(30,i0);"Keine Locoscript 
-Datei vorhanden!" 

4260 GOSÜB 4000 
4270 RETURN 
4280 : 

4290 '===== Programm beenden ================ 

4300 PRINT FNGotoXY$(28,10);"E n d e.. d e s. 
. Programms" 

43-10 PRINT FNGotoXY$(35,12) ;"L O C 0 D I R . 

B A S" 

4320 PRINT FNGotoXYS(1,28); 

4330 PRINT CLSS; 

4340 PRINT CursorEinS 
4350 END 
4360 : 

4370 '===== Fehlerbehandlung ================ 


<69> 4380 IF ERR=62 AND ERL=1570 THEN RESUME NEXT 
<46> 4390 IF ERR=62 AND ERL=1460 THEN RESUME 1600 
<41> 4400 CLOSE 1 
<80> 4410 RESUME 540 
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Nimm dir einen 

Strategie in Turbo Pascal 

Zu den Klassikern unter den Lugikspiclen gehört nicht zuletzt das sogenannte 
Nimm-Spiel. Hierbei müssen abwechselnd von zwei Spielern Hölzer von ei¬ 
nem Haufen genommen werden. Wer als letztesein Holz nimmt, Ist der Sieger. 


Eine der intcressanteslen und zugleich 
auch verblülTcndcn Lösungen für das 
Nimni-SpieJ stellt sicherlich der Bou¬ 
tons-Algorithmus dar. 

Aus einigen Streichhölzern bilden Sie 
drei oder auch mehr Haufen. Sie oder 
der Computer nehmen nun abwech¬ 
selnd beliebig viele Hölzer von diesen 
Haufen weg. Der Computer geht nach 


dem Boutons-Algorithmus vor. Um ei¬ 
nen Zug zu berechnen, benutzt er die 
binär codierte Anzahl der Hölzchen. 
Diese Anzahl wird nun dezimal addiert 
und anschließend überprüft, ob die 
Summe nur aus geraden Ziffern be¬ 
steht. Ist eine Ziffer ungerade, so ist die 
Stellung angreil'bar. Im folgenden Zug 
sind nun genauso viele Hölzchen weg¬ 


zunehmen, daß alle Ziffern gerade wer¬ 
den. Wird diese Strategie durchgehal¬ 
len. so kann das Spiel nicht verloren 
werden. 

Die Prozedur Eingabe erfragt die An¬ 
zahl der Hauten und belegt diese mit ei¬ 
ner zufälligen Zahl Hölzchen. Display 
zeigt diese als x auf dem Bildschinn an. 
Nun überprüft die Prozedur Computer¬ 
zug, ob sich ungerade Ziffern in der 
Summe der Hölzchen ergeben und zieht 
so lange, bis sicheineslabile Stellunger¬ 
gibt. Existiert bereits eine stabile Stel¬ 
lung, so nimmt der Computer vom er¬ 
sten Haufen > Ü. Die übrigen Programm- 
leilc müßten sich weitgehend selbst er¬ 
klären. Wir wünschen viel Spaß beim 
Kampf gegen den Computer. 

Dieter Kinzingcr/rs 


^**************************************) 

(* Nirrnn Spiel zur Demonstration des *) 


Write('*'); 


ClrEol; 

(* Boutons Algorithmus *) 


End; 

(* Adaption in Turbo Pascal *) 


End; 

{* JOYCE PCW 8256/8512/9512 *) 


Procedure eingabe; 

(* (c) 1992 Dieter Kinzinger *) 


(* & CPC International *) 


Var i : Byte; 

^ **********************•****************) 


Begin 

GotoXY{20,22); 

Program Nimm; 


Writ©('Wieviele Haufen <l-8> ? '); 

repeat 

Var häufen : Array[l..8] Of Integer; 


GotoXY(45,22);Write(chr(7));Read(anzahl); 

anzahl, 
ungerade. 


until anzahl In (1..8]; 


For i := 1 to anzahl Do 

wahl,ab 2 ug, 


häufen [i] ;= Trunc(l+2*i*Randora); 

rest : Byte; 


display; 

Spieler : Char; 


GotoXY(20,22); 

Ende,nochmal ; Boolean; 


Write('M|chten Sie beginnen?«^,n> '); 

GotoXY(48,22);Read(Spieler); 

Procedure hide Cursor; 


GotoXY(20,22);ClrEol; 

Begin 


End; 

write(#27,'f'); 



End; 


Procedure Status; 

Var zaehler,i,j,bit : Byte; 

Procedure Show Cursor; 


Begin 

Begin 


ungerade := 0 ;bit := l; 

Write(#27 ,'e '); 


For i := 1 to 4 do Begin 

End; 


zaehler 0 ; 

For j := 1 to anzahl do Begin 

Procedure linie(typ: Byte); 


If ((haufen[j] and bit)=bit) Then 

var art,i : Byte; 


zaehler :« zaehler + 1; 

Begin 


End; 

Case typ Of 


bit := bit * 2; 

1 : art := 138; 


ungerade := ungerade Or (zaehler and 1); 

2 : art 154; 


End; 

3 : art := 95; 


End; 

End; 



For i:=l to 90 Do Write{Chr{art) ); 


Procedure computerzug; 

End; 


Var i : Byte; 

Begin 

Procedure maske; 


hide Cursor; 

Begin 


Status; 

ClrScr; 


if ungerade > 0 Then Begin 

GotoXY(0,l);linie(i); 


wähl := 1; 

GotOXY(35,3);Write('N IMM-SPIE L'); 


abzug := Q; 

GotoXY(0,5);iinie(l); 


While (ungerade>0) And (wahl<=anzahl) Do 

GotoXY(0,20);linie(2); 


Begin 

GotoXY(0,28);linie{3); 


If häufen[Wahl 1 = 0 then Begin 

End; 


haufen(wahi):= haufen[wahl] + abzug; 
wähl wähl + 1 ; 

Procedure display; 


abzug := 0; 

Var i,k : Byte; 


End Else Begin 

Begin 


abzug := abzug + 1; 

For i:= 1 to anzahl do Begin 

GotoXY(10,i+8);Write(i, ': ') ; 


haufentwahl) := haufen[wahl] - 1; 


Status; 

For k:=i to haufen[ij Do 


End; 


100 CPC 6/7’92 












PCW 


End; 

End Else Begin 
wähl := 0; 

For i != 1 to anzahl Do 

If haufen[i] > wähl Then wähl i; 
abzug :=i haufen[wahl]; 
häufen[wähl3 := 0; 

End; 

display; 

rest:=0; 

For i:=l to anzahl Do Begin 
rest := haufen[i]+rest; 

End; 

If rest<=0 then Begin 
GotoXY(20,22); 

Write(Chr(7) , 'Der Computer hat gewonnen!'); 
Ende :=» true; 

End; 

show_cursor ; 

End; 

Procedure spielerzug; 

Var i : Byte; 

Begin 

GotoXY{20,22); 

Write('Aus welchem Haufen nehmen Sie? '); 
Repeat 

GotoXY(61,22);Write(Chr(7) ) ; Read(wähl); 

Until wähl In [1..anzahl]; 

GotoXY{20,22); 

Write('Wieviel Hilzchen mjchten Sie nehmen?', 
Repeat 

GotoXY(61,22) ;Write{Chr(7)) ;Read(abzug) ; 
Until abzug In [1..haufen(wahl]] ; 


GotoXY(20,22);ClrEol; 

häufen[wähl):=haufen[wähl]-abzug; 

display; 

rest:=0; 

For i;=l to anzahl Do rest := haufen[i]+rest; 

If rest=0 then Begin 
GotoXY(20,22); 

Write(Chr(7),'Sie haben gewonnen!'); 

Ende := True; 

End Else Computerzug; 

End; 

Procedure abfrage; 

Var wähl : char; 

Begin 

GotoXY(20,24); 

Write('Mjchten Sie noch ein Spiel? <j,n> '); 

Read(wähl); 

GotoXY(20,24);ClrEol; 

If wahl='j' Then nochmal:=True 
Else nochmal:=False; 

End; 

Begin 

Repeat 

Ende := False; 

maske; 

eingabe; 

If Spieler = 'j' Then spielerzug 
Else Computerzug; 

Repeat spielerzug Until Ende; 
abfrage; 

Until nochmal = False; 

ClrScr; 

End, 
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Für alles und jeden ein Programm zur Hand haben? Verfolgen Sie nur 
die Trickkisie. und dies hleihi keine Utopie. 


»CPC International« 8/9’92 er¬ 
halten Sie nur im Bahnhofs* 
buchhandel oder direkt beim 
Verlag ab; 


JULI 



Mittwoch 


CPC 


- Diskettenplatz satt hat eigentlich kei¬ 
ner. Und dies schon gar nicht, wenn er 
auf die teuren 3-Zoll-Disketten ange¬ 
wiesen ist. Abhilfe schaffen hier soge¬ 
nannte Cruncher oder besser Datei¬ 
komprimierprogramme, die in der La¬ 
ge sind, einzelne Dateien zusammen¬ 
zustauchen. 

Wir wollen Ihnen einige dieser Pro¬ 
gramme vorsteilen und selbstverständ¬ 
lich aucheinen speziell fiirden CPCge¬ 
schriebenen Cruncher anbieten. 

Daß unser Cruncher direkt von BASIC 
aus gestartet werden kann, versteht sich 
von selbst. 

- Wer sagt da. Programmieren sei 
schwierig? Es kommt lediglich darauf 
an, einige Anregungen und Problem¬ 
lösungen präsentiert zu bekommen, 
bei denen man ein wenig abschauen 
kann. In der Trickkiste der nächsten 


Ausgabe steht aber noch mehr als nur 
trockener Assembler-Text, aber sehen 
Sie selbst... 

- Wer meint, wir wären mit unserem 
Latein am Ende, der muß sehen, daß es 
immer wieder interessante Hardware 
um den CPC gibt. Nach Konsole, Moni¬ 
tor und Drucker wollen wir in Ausgabe 
8/9’92 ein wenig Diskettenkunde be¬ 
treiben. Rund um die Floppy-Disk des 
CPC wird sich unser nächster Hard¬ 
ware-Striptease drehen. 

HARDWARE 

-Auch für den kleinen Geldbeutel hat die 
Druckerbranche so manch interessantes 
Gerät parat. Gerade zu den letzen Messen 
wartete fast jeder Druckerhersteller mit 
einem Low-Cost-Gerät auf. Wir haben 
uns einige herausgepickt und möchten 
mit Ihnen einen kleinen Bummel durch 
den Druckerdschungel unternehmen. 


PCW 


Leckerbissen aus der Public Domain 
könnte der Artikel in der nächsten CPC 
genannt werden. Wir stellen neben 
nützlichen Anwendungen auch so man- 
chesSpitzenspiel vor. 

-Bei SuperDir handelt es sich um eine 
Benutzeroberfläche für den PCW. Was 
hat es damit auf sich? Lohnt sich der 
Kauf? Das alles erfahren Sie in der CPC 
8/9’92. 

- Direkt vom Tüftler können wir Ihnen 
aber auch wieder einige Patches für die 
Joyce-Systemsoftware anbieten. 

Wie wäre es, zum Bei.spiel damit: 

Jetzt können Disketten auch unter 
LocoScript 2.30a mit 43 beziehungs¬ 
weise 84 Spuren formatiert werden 
und somit können stolze 184 oder 742 
kByte pro JOYCE-Diskette benutzt 
werden. 


AtlantikküsteiNicaröfju^i 



Christlich 
Medizinische 
Aktion 
für Indianer 


■ Naturkatastrophen, jahrzehntelan¬ 
ger Bürgerkrieg, Flucht und Rücksied¬ 
lung... der Übcrlebcnskampf der Indi¬ 
aner hier ist beeindruckend. Sie leben in 
einer der ärmsten Regionen des Landes, 
in dem die Gesundheilsversorgung ka¬ 
tastrophal ist. Jetzt leisten engagierte 
Ärzte der „Christlich Medizinischen 
Aktion“ einen wichtigen Beitrag zur Ver¬ 
besserung der Gesundheit in 38 indiani¬ 
schen Dorfgcmcinschaftcn. 

■ Neben der ärztlichen Versorgung 
geht es dabei vor allem um die Ausbil- 
dungvon Gesundheitshelfern und I leb- 


ammen.ln Kursen nutzen sie die Eigen¬ 
initiative der Indianer und vermitteln 
Grundkenntnisse in der Zvibercitung 
hygienischen Trinkwassers, zur Mala¬ 
ria-Vorbeugung und Behandlung von 
Durchfall, Tuberculose und anderen 
Geißeln der Armen. 


Postfach 101142 
7000 Stuttgart 10 


Postgiro Köln 
.300 500-500 
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Forever young 



Neu: Der CPC-Club! 

Mit Ihrer Abo-Bestätigung erhalten Sie automatisch den 
Clubgutschein mit allen Leistungen der CPC-Redaktion! 
Jetzt anfordern! 


Bestellen Sie jetzt per Postkarte! 


100.000 stolze CPC- und PCW-Besitzer schwören drauf: 
Der CPC - nach zehn erfolgreichen Jahren noch immer 
UP TO DATE! 

Und für alle, die auf dem aktuellen Stand bleiben wollen, 
bietet sich jetzt die Gelegenheit: 

CPC-Amstrad, die ewig junge Zeitschrift für den über¬ 
zeugten CPC-Benutzer, im ABO. 


Widerrufsrecht; 

Jeder Abonnent hat das Recht, seine Bestellung innerhalb einer Woche beim DMV- 
Verlag, Postfach 250, W-3440 Eschwege, schriftlich zu widerrufen. Die rechtzeitige 
Absendung des Widerrufschreibens genügt zur Fristwahrung. 

DMV-Verlag • Postfach 250 • W-3440 Eschwege 
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Zahiungsweise; 

Am einfachsten per Vorkasse (Verrechnungsscheck) oder als Nachnahme zu¬ 
züglich der Nachnahmegebühr. Bei Lieferungen ins Ausland ist Nachnahme 
nicht möglich. 

Bitte benutzen Sie die Bestellkarte. 

DMV-Verlag ■ Postfach 250 ■ 3440 Eschwege 


- Die Programme sind, soweit systembedingt möglich, 
auf allen drei CPC-Modellen lauffähig. Einzelheiten 
entnehmen Sie bitte der nebenstehenden Aufstellung. 


- Soweit die Programme nicht Bestandteil einer Serie 
sind, befinden sich alle Programme als »ready to run« 
auf der DATABOX. 

- erscheint jeden Monat und trägt das Titelbild des 
gleichzeitig erscheinenden Heftes 


DATABOX 


Das ist die Software zur CPC INTERNATIONAL 
Jeden Monat neu 

DATABOX: 

- mehr als der übliche Software-Service 

- bringt ergänzend sämtliche Listings der jeweiligen 
Zeitschrift und alle Programmbeispiele auf Kassette 
oder auf 3-Zoll-Diskette 


• . 

3-2011-0,skette'' 


Kassette 


Inland: 


Ausland: 


Einzelpreis 

14.- DM 

Einzelpreis 

14,- DM 

zzgl, Versandkosten 

4,- DM 

zzgl. Versandkosten 

6,- DM 

Endpreis 

18,- DM 

Endpreis 

20,- DM 


- Der Datenträger zur CPC International enthält außerdem 
jedesmal ein zusätzliches Bonusprogramm, das nicht im 
Heft abgedruckt ist. 


Einzelbezugspreise für DATABOX: 
3-Zoll-Diskette 


Inland: 

Einzelpreis 24,- DM 

zzgl. Versandkosten 4.- DM 


Ausland: 

Einzelpreis 24,- DM 

zzgl. Versandkosten 6,- DM 


Endpreis 


28,- DM Endpreis 


30,- DM 


















